Mercurial > emacs
diff lisp/help.el @ 23922:81d1dacd379e
(describe-function-1): Say "keymap", not "Lisp macro",
if this is an autoloaded keymap.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Mon, 21 Dec 1998 10:03:01 +0000 |
parents | e9fe8ed71303 |
children | 5ab992b6ca59 |
line wrap: on
line diff
--- a/lisp/help.el Mon Dec 21 09:59:30 1998 +0000 +++ b/lisp/help.el Mon Dec 21 10:03:01 1998 +0000 @@ -620,9 +620,10 @@ "a mocklisp function") ((eq (car-safe def) 'autoload) (setq file-name (nth 1 def)) - (format "%s autoloaded Lisp %s" + (format "%s autoloaded %s" (if (commandp def) "an interactive" "an") - (if (nth 4 def) "macro" "function") + (if (eq (nth 4 def) 'keymap) "keymap" + (if (nth 4 def) "Lisp macro" "Lisp function")) )) (t ""))) (when (and parens (not (equal string "")))