HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
c3ce7bf
)
(describe-function-1): Accept non-symbols.
author
Richard M. Stallman
<rms@gnu.org>
Tue, 16 Feb 1999 23:09:54 +0000
(23:09 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Tue, 16 Feb 1999 23:09:54 +0000
(23:09 +0000)
lisp/help.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/help.el
b/lisp/help.el
index
2120a2c
..
8332398
100644
(file)
--- a/
lisp/help.el
+++ b/
lisp/help.el
@@
-600,7
+600,9
@@
It can also be nil, if the definition is not associated with any file."
(message "You didn't specify a function")))
(defun describe-function-1 (function parens)
- (let* ((def (symbol-function function))
+ (let* ((def (if (symbolp function)
+ (symbol-function function)
+ function))
file-name string need-close
(beg (if (commandp def) "an interactive " "a ")))
(setq string