procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(describe-function-1): Say "keymap", not "Lisp macro",

Browse source 
if this is an autoloaded keymap.
This commit is contained in:
Andreas Schwab 1998-12-21 10:03:01 +00:00
parent a3cec380f5
commit aed2b2cd47
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/help.el
View file

@ -620,9 +620,10 @@ It can also be nil, if the definition is not associated with any file."
"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 "")))