Mercurial > emacs
changeset 65585:6d0d4d973f77
Message format spec fixes, commit no. 4
author | Deepak Goel <deego@gnufans.org> |
---|---|
date | Sun, 18 Sep 2005 12:32:51 +0000 |
parents | 6dbba0bd58df |
children | 86bece058ee5 |
files | lisp/play/decipher.el lisp/play/landmark.el lisp/play/zone.el |
diffstat | 3 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/play/decipher.el Sun Sep 18 12:31:28 2005 +0000 +++ b/lisp/play/decipher.el Sun Sep 18 12:32:51 2005 +0000 @@ -600,7 +600,7 @@ (defun decipher-show-alphabet () "Display the current cipher alphabet in the message line." (interactive) - (message + (message "%s" (mapconcat (lambda (a) (concat (char-to-string (car a))
--- a/lisp/play/landmark.el Sun Sep 18 12:31:28 2005 +0000 +++ b/lisp/play/landmark.el Sun Sep 18 12:32:51 2005 +0000 @@ -1473,7 +1473,7 @@ (lm-plot-square (lm-point-square) 1) (incf lm-number-of-moves) (if lm-output-moves - (message (format "Moves made: %d" lm-number-of-moves)))) + (message "Moves made: %d" lm-number-of-moves))) (defun lm-random-move ()
--- a/lisp/play/zone.el Sun Sep 18 12:31:28 2005 +0000 +++ b/lisp/play/zone.el Sun Sep 18 12:32:51 2005 +0000 @@ -179,7 +179,7 @@ (error (funcall restore) (while (not (input-pending-p)) - (message (format "We were zoning when we wrote %s..." pgm)) + (message "We were zoning when we wrote %s..." pgm) (sit-for 3) (message "...here's hoping we didn't hose your buffer!") (sit-for 3)))