From 37fda77e2df38df6812f276fc91fe161ca0d358b Mon Sep 17 00:00:00 2001 From: Martin Rudalics Date: Sat, 6 Sep 2008 10:02:33 +0000 Subject: (symbol-file): Fix doc-string. --- lisp/subr.el | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) (limited to 'lisp/subr.el') diff --git a/lisp/subr.el b/lisp/subr.el index f8d26024c45..b7b6b2c38de 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1458,14 +1458,15 @@ If TOGGLE has a `:menu-tag', that is used for the menu item's label." ;; (setq symbol-file-load-history-loaded t))) (defun symbol-file (symbol &optional type) - "Return the input source in which SYMBOL was defined. -The value is an absolute file name. -It can also be nil, if the definition is not associated with any file. - -If TYPE is nil, then any kind of definition is acceptable. -If TYPE is `defun' or `defvar', that specifies function -definition only or variable definition only. -`defface' specifies a face definition only." + "Return the name of the file that defined SYMBOL. +The value is normally an absolute file name. It can also be nil, +if the definition is not associated with any file. If SYMBOL +specifies an autoloaded function, the value can be a relative +file name without extension. + +If TYPE is nil, then any kind of definition is acceptable. If +TYPE is `defun', `defvar', or `defface', that specifies function +definition, variable definition, or face definition only." (if (and (or (null type) (eq type 'defun)) (symbolp symbol) (fboundp symbol) (eq 'autoload (car-safe (symbol-function symbol)))) -- cgit v1.2.1