diff options
| author | Stefan Kangas | 2021-04-30 19:30:28 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2021-04-30 19:30:28 +0200 |
| commit | 04266a2cacc0f0705d0d1abaada464b402cc7b07 (patch) | |
| tree | 7591e5f0df7caa442cdae9b147956dcfce30125e | |
| parent | 1167253f75badf9e7df1bf983c2ebeb2d37d3881 (diff) | |
| download | emacs-04266a2cacc0f0705d0d1abaada464b402cc7b07.tar.gz emacs-04266a2cacc0f0705d0d1abaada464b402cc7b07.zip | |
Advertise PgUp/PgDn instead of SPC/DEL in help-for-help
* lisp/help-macro.el (make-help-screen):
* lisp/help.el (help-for-help): Advertise PgUp/PgDn instead of
SPC/DEL.
| -rw-r--r-- | lisp/help-macro.el | 4 | ||||
| -rw-r--r-- | lisp/help.el | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/lisp/help-macro.el b/lisp/help-macro.el index 7fe1fb6c3d0..132530deb3b 100644 --- a/lisp/help-macro.el +++ b/lisp/help-macro.el | |||
| @@ -168,9 +168,9 @@ and then returns." | |||
| 168 | (point-max)) | 168 | (point-max)) |
| 169 | "" | 169 | "" |
| 170 | (concat ", or " | 170 | (concat ", or " |
| 171 | (help--key-description-fontified "\s") ; SPC | 171 | (help--key-description-fontified (kbd "<PageDown>")) |
| 172 | " or " | 172 | " or " |
| 173 | (help--key-description-fontified "\d") ; DEL | 173 | (help--key-description-fontified (kbd "<PageUp>")) |
| 174 | " to scroll")))) | 174 | " to scroll")))) |
| 175 | char (aref key 0))) | 175 | char (aref key 0))) |
| 176 | 176 | ||
diff --git a/lisp/help.el b/lisp/help.el index 85312a411ad..bd671c3d16b 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -233,9 +233,9 @@ Do not call this in the scope of `with-help-window'." | |||
| 233 | (purecopy "Type a help option: [abcCdefFgiIkKlLmnprstvw.] C-[cdefmnoptw] or ?") | 233 | (purecopy "Type a help option: [abcCdefFgiIkKlLmnprstvw.] C-[cdefmnoptw] or ?") |
| 234 | (concat | 234 | (concat |
| 235 | "\(Type " | 235 | "\(Type " |
| 236 | (help--key-description-fontified "\s") ; SPC | 236 | (help--key-description-fontified (kbd "<PageDown>")) |
| 237 | " or " | 237 | " or " |
| 238 | (help--key-description-fontified "\d") ; DEL | 238 | (help--key-description-fontified (kbd "<PageUp>")) |
| 239 | " to scroll, " | 239 | " to scroll, " |
| 240 | (help--key-description-fontified "\C-s") | 240 | (help--key-description-fontified "\C-s") |
| 241 | " to search, or \\<help-map>\\[help-quit] to exit.)" | 241 | " to search, or \\<help-map>\\[help-quit] to exit.)" |