summaryrefslogtreecommitdiff
path: root/lisp/ehelp.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-01-25 00:53:48 +0000
committerKarl Heuer <kwzh@gnu.org>1996-01-25 00:53:48 +0000
commit7bccdfbc11a1a8dbd5f3aaad824785a3282324a9 (patch)
tree020ded7e6d52c82bef0ae3bdc83d123dd1fc0942 /lisp/ehelp.el
parent2bb7c30c3dd62e8417da08c6714bdfc198d6634b (diff)
downloademacs-7bccdfbc11a1a8dbd5f3aaad824785a3282324a9.tar.gz
(electric-help-command-loop): Pass proper format string to message.
Diffstat (limited to 'lisp/ehelp.el')
-rw-r--r--lisp/ehelp.el2
1 files changed, 1 insertions, 1 deletions
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)