# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 822710165 0
# Node ID b7708fc4d023ea11898f85ac2d30ea08508756e3
# Parent  9c3c642de62acdcc7a0717d81b83e7ef714602c4
(ispell-command-loop, ispell-region): Pass proper format string to message.

diff -r 9c3c642de62a -r b7708fc4d023 lisp/textmodes/ispell.el
--- a/lisp/textmodes/ispell.el	Sat Jan 27 02:18:29 1996 +0000
+++ b/lisp/textmodes/ispell.el	Sat Jan 27 02:36:05 1996 +0000
@@ -1100,7 +1100,7 @@
 		   ;; Quit and preserve point.
 		   ((= char ?X)
 		    (ispell-pdict-save ispell-silently-savep)
-		    (message
+		    (message "%s"
 		     (substitute-command-keys
 		      (concat "Spell-checking suspended;"
 			      " use C-u \\[ispell-word] to resume")))
@@ -1855,10 +1855,8 @@
 					offset-change (+ offset-change change)
 					end (+ end change)))))
 			      (if (not ispell-quit)
-				  (message
-				   (concat "Continuing spelling check using "
-					   (or ispell-dictionary "default")
-					   " dictionary...")))
+				  (message "Continuing spelling check using %s dictionary..."
+					   (or ispell-dictionary "default")))
 			      (sit-for 0)))
 			;; finished with line!
 			(setq ispell-filter (cdr ispell-filter)))))