diff options
| author | Lars Ingebrigtsen | 2016-03-04 14:09:02 +0000 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2016-03-04 15:33:38 +0000 |
| commit | 1ba03225ad7a9228d5ceee14dcf6669c6a32babb (patch) | |
| tree | 23c068a696ed29bd4b3263486f44068ebed0eb71 | |
| parent | cede502627415df2e5f30ad0f3600236f9603158 (diff) | |
| download | emacs-1ba03225ad7a9228d5ceee14dcf6669c6a32babb.tar.gz emacs-1ba03225ad7a9228d5ceee14dcf6669c6a32babb.zip | |
Make the describe-key prompts clearer
* lisp/help.el (describe-key-briefly): Make the prompt clearer
(bug#14854).
(describe-key): Ditto.
| -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 ce68cea6dd5..baccf5988b8 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -615,7 +615,7 @@ temporarily enables it to allow getting help on disabled items and buttons." | |||
| 615 | (menu-bar-update-yank-menu "(any string)" nil)) | 615 | (menu-bar-update-yank-menu "(any string)" nil)) |
| 616 | (while | 616 | (while |
| 617 | (progn | 617 | (progn |
| 618 | (setq key (read-key-sequence "Describe key (or click or menu item): ")) | 618 | (setq key (read-key-sequence "Describe the following key, mouse click, or menu item: ")) |
| 619 | (and (vectorp key) | 619 | (and (vectorp key) |
| 620 | (consp (aref key 0)) | 620 | (consp (aref key 0)) |
| 621 | (symbolp (car (aref key 0))) | 621 | (symbolp (car (aref key 0))) |
| @@ -760,7 +760,7 @@ temporarily enables it to allow getting help on disabled items and buttons." | |||
| 760 | (menu-bar-update-yank-menu "(any string)" nil)) | 760 | (menu-bar-update-yank-menu "(any string)" nil)) |
| 761 | (while | 761 | (while |
| 762 | (progn | 762 | (progn |
| 763 | (setq key (read-key-sequence "Describe key (or click or menu item): ")) | 763 | (setq key (read-key-sequence "Describe the following key, mouse click, or menu item: ")) |
| 764 | (and (vectorp key) | 764 | (and (vectorp key) |
| 765 | (consp (aref key 0)) | 765 | (consp (aref key 0)) |
| 766 | (symbolp (car (aref key 0))) | 766 | (symbolp (car (aref key 0))) |