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 | 5c1ce100bb11a2e7ca5ecd3e103791cd35685126 (patch) | |
| tree | 1b2bcfcd62edec2b860beec0ba1961565dc782e0 | |
| parent | 13b989bb45c8168ffcf9e723c06a487cd0bce128 (diff) | |
| download | emacs-5c1ce100bb11a2e7ca5ecd3e103791cd35685126.tar.gz | |
(electric-help-command-loop): Pass proper format string to message.
| -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) |