1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-01 20:06:00 +00:00

Message format spec fixes, commit no. 4

This commit is contained in:
Deepak Goel 2005-09-18 12:32:51 +00:00
parent 29a4e67d88
commit 8c307e0f56
3 changed files with 3 additions and 3 deletions

View File

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

View File

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

View File

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