Synch with the semi-1_14 branch.

diff --git a/mime-edit.el b/mime-edit.el
index 3b6d5fa..e97a483 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -1662,7 +1662,7 @@ Optional DELIMITER specifies parameter delimiter (';' by default)."
 
 (defun mime-prompt-for-parameter (parameter)
   "Ask for PARAMETER.
-Parameter must be '(PROMPT CHOICE1 (CHOISE2 ...))."
+Parameter must be '(PROMPT CHOICE1 (CHOICE2...))."
   (let* ((prompt (car parameter))
         (choices (mapcar (function
                           (lambda (e)
@@ -2620,7 +2620,7 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
          (message (format "Sending %d/%d..."
                           mime-edit-partial-number total))
          (call-interactively command)
-         (message (format "Sending %d/%d... done"
+         (message (format "Sending %d/%d...done"
                           mime-edit-partial-number total)))
        (setq mime-edit-partial-number
              (1+ mime-edit-partial-number)))
@@ -2635,7 +2635,7 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
       (save-excursion
        (message (format "Sending %d/%d..."
                         mime-edit-partial-number total))
-       (message (format "Sending %d/%d... done"
+       (message (format "Sending %d/%d...done"
                         mime-edit-partial-number total))))))
 
 (defun mime-edit-maybe-split-and-send (&optional cmd)

diff --git a/mime-image.el b/mime-image.el
index 76c2335..70347b0 100644 (file)
--- a/mime-image.el
+++ b/mime-image.el
@@ -196,7 +196,7 @@
       (save-excursion
        (mime-image-insert image)
        (insert "\n")
-       (message "Decoding image... done")))))
+       (message "Decoding image...done")))))
 
 ;;; @ end
 ;;;

diff --git a/mime-mc.el b/mime-mc.el
index 7e5cb26..a9f1ebc 100644 (file)
--- a/mime-mc.el
+++ b/mime-mc.el
@@ -130,7 +130,7 @@ Content-Transfer-Encoding: 7bit
     (if mc-pgp-comment
        (setq args (cons (format "+comment=%s" mc-pgp-comment) args))
       )
-    (message "Signing as %s ..." (car key))
+    (message "Signing as %s..." (car key))
     (if (mime-mc-process-region
         start end passwd pgp-path args parser buffer boundary)
        (progn
@@ -142,7 +142,7 @@ Content-Transfer-Encoding: 7bit
 --[[multipart/signed; protocol=\"application/pgp-signature\";
  boundary=\"%s\"; micalg=pgp-md5][7bit]]\n" boundary))
                ))
-         (message "Signing as %s ... Done." (car key))
+         (message "Signing as %s...done" (car key))
          t)
       nil)))
 

diff --git a/mime-play.el b/mime-play.el
index 302c4ff..187cfb6 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -651,7 +651,7 @@ It is registered to variable `mime-preview-quitting-method-alist'."
         (directory (cdr (assoc "directory" cal)))
         (name (cdr (assoc "name" cal)))
         (pathname (concat "/anonymous@" site ":" directory)))
-    (message (concat "Accessing " (expand-file-name name pathname) " ..."))
+    (message (concat "Accessing " (expand-file-name name pathname) "..."))
     (funcall mime-raw-dired-function pathname)
     (goto-char (point-min))
     (search-forward name)))
@@ -660,7 +660,7 @@ It is registered to variable `mime-preview-quitting-method-alist'."
 
 (defun mime-view-message/external-url (entity cal)
   (let ((url (cdr (assoc "url" cal))))
-    (message (concat "Accessing " url " ..."))
+    (message (concat "Accessing " url "..."))
     (funcall mime-raw-browse-url-function url)))
 
 

diff --git a/mime-view.el b/mime-view.el
index 14feb14..c4591b9 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -450,7 +450,7 @@ You can customize the visibility by changing `mime-view-button-place-alist'."
                        "\n\t")
                    rest))))))
       (if body-is-invisible
-         " ..."
+         "..."
        ""))
      (function mime-preview-play-current-entity))))