diff options
author | Stefan Kangas <stefankangas@gmail.com> | 2022-10-16 13:02:24 +0200 |
---|---|---|
committer | Stefan Kangas <stefankangas@gmail.com> | 2022-10-16 13:03:59 +0200 |
commit | d4244ec8cc42672fbec5fdbbd8eb9f257d2f974c (patch) | |
tree | 8ef39ad91f18e3cc898c6041ec9443099c343d64 | |
parent | 77d5be5877f7a6c2622d6d78d15bbfd89f8751f4 (diff) | |
download | emacs-d4244ec8cc42672fbec5fdbbd8eb9f257d2f974c.tar.gz |
Make help-for-help echo key on failure
* lisp/help-macro.el (make-help-screen): Echo key on failure.
-rw-r--r-- | lisp/help-macro.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/help-macro.el b/lisp/help-macro.el index 962bc5a8d87..cf024afe254 100644 --- a/lisp/help-macro.el +++ b/lisp/help-macro.el @@ -211,6 +211,9 @@ and then returns." (iconify-frame new-frame)) (setq new-frame nil))) (unless (equal (key-description key) "C-g") + (message (substitute-command-keys + (format "No help command is bound to `\\`%s''" + (key-description key)))) (ding)))))) (when config (set-window-configuration config)) |