Mercurial > emacs
diff lisp/mh-e/mh-e.el @ 65595:8e711c68e4ff
message format spec fixes, commit 14, this should be final commit
author | Deepak Goel <deego@gnufans.org> |
---|---|
date | Sun, 18 Sep 2005 12:48:32 +0000 |
parents | 120985a68bd9 |
children | 4520ae2624f2 fa0da9b57058 |
line wrap: on
line diff
--- a/lisp/mh-e/mh-e.el Sun Sep 18 12:45:54 2005 +0000 +++ b/lisp/mh-e/mh-e.el Sun Sep 18 12:48:32 2005 +0000 @@ -734,7 +734,7 @@ (apply 'mh-write-msg-to-file msg (cdr mh-last-destination))) (mh-next-msg interactive-flag) (format "Destination: %s" (cdr mh-last-destination))))) - (message output))) + (message "%s" output))) (defun mh-quit () "Quit the current MH-E folder. @@ -778,12 +778,12 @@ (if (mh-in-show-buffer (mh-show-buffer) (pos-visible-in-window-p (point-max))) (progn - (message (format - "End of message (Type %s to read %s undeleted message)" - (single-key-description last-input-event) - (if (equal mh-next-direction 'backward) - "previous" - "next"))) + (message + "End of message (Type %s to read %s undeleted message)" + (single-key-description last-input-event) + (if (equal mh-next-direction 'backward) + "previous" + "next")) (setq mh-page-to-next-msg-flag t)) (scroll-other-window arg))) (mh-show)))