changeset 14311:381c7a6d21f6

(electric-help-command-loop): Pass proper format string to message.
author Karl Heuer <kwzh@gnu.org>
date Thu, 25 Jan 1996 00:53:48 +0000
parents 49af6e2bfaa8
children 6dfd1f4fa87c
files lisp/ehelp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ehelp.el	Thu Jan 25 00:53:08 1996 +0000
+++ b/lisp/ehelp.el	Thu Jan 25 00:53:48 1996 +0000
@@ -164,7 +164,7 @@
 (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)