Mercurial > emacs
changeset 43309:63607f9209a0
(describe-key-briefly): Make output in INSERT case
look just like what is displayed in the normal case.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 15 Feb 2002 19:59:25 +0000 |
| parents | e04cbee893bc |
| children | 93653d31963e |
| files | lisp/help.el |
| diffstat | 1 files changed, 3 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help.el Fri Feb 15 17:06:58 2002 +0000 +++ b/lisp/help.el Fri Feb 15 19:59:25 2002 +0000 @@ -477,11 +477,9 @@ (key-desc (key-description key))) (if (or (null defn) (integerp defn)) (princ (format "%s is undefined" key-desc)) - (princ (format (if insert - "`%s' (`%s')" - (if (windowp window) - "%s at that spot runs the command %s" - "%s runs the command %s")) + (princ (format (if (windowp window) + "%s at that spot runs the command %s" + "%s runs the command %s") key-desc (if (symbolp defn) defn (prin1-to-string defn)))))))))