summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/play/decipher.el2
-rw-r--r--lisp/play/landmark.el2
-rw-r--r--lisp/play/zone.el2
3 files changed, 3 insertions, 3 deletions
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)))