- changed three dots with ellipsis.

src/scheduled-events.lisp

@@ -44,7 +44,7 @@
   (ui:gemlog-refresh-all))
 
 (gen-scheduler-function (purge-gemlog-entries +purge-gemlog-entries+)
-  (ui:notify (_ "Removing old gemlog posts..."))
+  (ui:notify (_ "Removing old gemlog posts…"))
   (db:purge-seen-gemlog-entries)
   (ui:notify (_ "Removed")))
 

src/text-utils.lisp

@@ -208,11 +208,11 @@
   (make-string (max 0 (- total-size (length str)))
                :initial-element padding-char))
 
-(defun ellipsize (string len &key (truncate-string "..."))
+(defun ellipsize (string len &key (truncate-string "…"))
   "If 'string''s length is bigger  than 'len', cut the last characters
   out.  Also replaces the last n  characters (where n is the length of
   'truncate-string')     of     the      shortened     string     with
-  'truncate-string'. It  defaults to  \"...\", but can  be nil  or the
+  'truncate-string'. It  defaults to  \"…\", but can  be nil  or the
   empty string."
   (let ((string-len (length string)))
     (cond

src/tui-utils.lisp

@@ -191,13 +191,13 @@ as argument `complex-string'."
   (:documentation "If `object''s length is bigger  than `len', cut the last characters
   out.  Also replaces the last n  characters (where n is the length of
   `truncate-string')     of     the      shortened     string     with
-  `truncate-string'. It  defaults to  \"...\", but can  be nil  or the
+  `truncate-string'. It  defaults to  \"…\", but can  be nil  or the
   empty string."))
 
-(defmethod text-ellipsis ((object string) len &key (truncate-string "..."))
+(defmethod text-ellipsis ((object string) len &key (truncate-string "…"))
   (ellipsize object len :truncate-string truncate-string))
 
-(defmethod text-ellipsis ((object complex-string) len &key (truncate-string "..."))
+(defmethod text-ellipsis ((object complex-string) len &key (truncate-string "…"))
   (croatoan:text-ellipsize object len :truncate-string truncate-string))
 
 (defgeneric right-pad-text (object total-size &key padding-char)

src/ui-goodies.lisp

@@ -1607,7 +1607,7 @@ This command will remove those limits so that we can just jump to the last messa
                             (format nil
                                     (_ "Invalid choices, index choice out of range (max ~a).")
                                     (1- (length options))))
-                           (with-blocking-notify-procedure ((_ "Voting... ")
+                           (with-blocking-notify-procedure ((_ "Voting… ")
                                                             (_ "Choice sent."))
                              (push-event event)))))))))
     (when-let* ((fields (line-oriented-window:selected-row-fields