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)))