From: Deepak Goel <deego@gnufans.org>
Date: Sun, 18 Sep 2005 12:32:51 +0000 (+0000)
Subject: Message format spec fixes, commit no. 4
X-Git-Tag: emacs-pretest-22.0.90~7042
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8c307e0f56cac8a485ba6355ccd6f9e943b49f7c;p=emacs.git

Message format spec fixes, commit no. 4
---

diff --git a/lisp/play/decipher.el b/lisp/play/decipher.el
index 6471e23b5f2..e8850e6fdf4 100644
--- a/lisp/play/decipher.el
+++ b/lisp/play/decipher.el
@@ -600,7 +600,7 @@ you have determined the keyword."
 (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))
diff --git a/lisp/play/landmark.el b/lisp/play/landmark.el
index 4da291d4505..67c6c0d3021 100644
--- a/lisp/play/landmark.el
+++ b/lisp/play/landmark.el
@@ -1473,7 +1473,7 @@ After this limit is reached, lm-random-move is called to push him out of it."
   (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 ()
diff --git a/lisp/play/zone.el b/lisp/play/zone.el
index 876490b1f9a..7441c2b9aa8 100644
--- a/lisp/play/zone.el
+++ b/lisp/play/zone.el
@@ -179,7 +179,7 @@ If the element is a function or a list of a function and a number,
         (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)))