summaryrefslogtreecommitdiff
path: root/lisp/help.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2020-09-01 11:39:22 +0200
committerStefan Kangas <stefankangas@gmail.com>2020-09-01 11:55:57 +0200
commit302f71e55da427529d3d0d62dd1511552aad9f7b (patch)
tree2fc2d1daf550e5b3408c2d3de0d3e2162fea9baa /lisp/help.el
parent0fb3fc92b33a6adb657194e056b2910058478022 (diff)
downloademacs-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.el4
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)))))