diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2020-09-01 11:39:22 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2020-09-01 11:55:57 +0200 |
| commit | 302f71e55da427529d3d0d62dd1511552aad9f7b (patch) | |
| tree | 2fc2d1daf550e5b3408c2d3de0d3e2162fea9baa /lisp/help.el | |
| parent | 0fb3fc92b33a6adb657194e056b2910058478022 (diff) | |
| download | emacs-302f71e55da427529d3d0d62dd1511552aad9f7b.tar.gz | |
Fix help message with help-window-select
* lisp/help.el (help-print-return-message):
(help-window-display-message): Recommend 'scroll-up-command' instead
of 'scroll-up' when 'help-window-select' is non-nil. (Bug#43122)
Diffstat (limited to 'lisp/help.el')
| -rw-r--r-- | lisp/help.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el index 0f1991e3185..c276c1dc280 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -179,7 +179,7 @@ Do not call this in the scope of `with-help-window'." (if (same-window-p (buffer-name standard-output)) ;; Say how to scroll this window. (substitute-command-keys - "\\[scroll-up] to scroll the help.") + "\\[scroll-up-command] to scroll the help.") ;; Say how to scroll some other window. (substitute-command-keys "\\[scroll-other-window] to scroll the help.")))))))) @@ -1243,7 +1243,7 @@ window." ".") ((eq scroll 'other) ", \\[scroll-other-window] to scroll help.") - (scroll ", \\[scroll-up] to scroll help.")))) + (scroll ", \\[scroll-up-command] to scroll help.")))) (message "%s" (substitute-command-keys (concat quit-part scroll-part))))) |
