diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-01-25 00:53:48 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-01-25 00:53:48 +0000 |
commit | 7bccdfbc11a1a8dbd5f3aaad824785a3282324a9 (patch) | |
tree | 020ded7e6d52c82bef0ae3bdc83d123dd1fc0942 /lisp/ehelp.el | |
parent | 2bb7c30c3dd62e8417da08c6714bdfc198d6634b (diff) | |
download | emacs-7bccdfbc11a1a8dbd5f3aaad824785a3282324a9.tar.gz |
(electric-help-command-loop): Pass proper format string to message.
Diffstat (limited to 'lisp/ehelp.el')
-rw-r--r-- | lisp/ehelp.el | 2 |
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) |