From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 25 Jan 1996 00:53:48 +0000 (+0000)
Subject: (electric-help-command-loop): Pass proper format string to message.
X-Git-Tag: emacs-19.34~1549
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7bccdfbc11a1a8dbd5f3aaad824785a3282324a9;p=emacs.git

(electric-help-command-loop): Pass proper format string to message.
---

diff --git a/lisp/ehelp.el b/lisp/ehelp.el
index fec1dfca748..c03003205e4 100644
--- a/lisp/ehelp.el
+++ b/lisp/ehelp.el
@@ -164,7 +164,7 @@ BUFFER is put into `default-major-mode' (or `fundamental-mode') when we exit."
 (defun electric-help-command-loop ()
   (catch 'exit
     (if (pos-visible-in-window-p (point-max))
-	(progn (message (substitute-command-keys "<<< Press Space to bury the help buffer, Press \\[electric-help-retain] to retain it >>>"))
+	(progn (message "%s" (substitute-command-keys "<<< Press Space to bury the help buffer, Press \\[electric-help-retain] to retain it >>>"))
 	       (if (equal (setq unread-command-events (list (read-event)))
 			  '(?\ ))
 		   (progn (setq unread-command-events nil)