Commit 6016b6e4 authored by Richard M. Stallman's avatar Richard M. Stallman

(describe-function-1): Accept non-symbols.

parent c3ce7bf4
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment