* lisp/help-fns.el (find-lisp-object-file-name): Revert last change

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 88e553c1a059baee83ea88201b858a540f4a912c..bb5b3bb71ff54ac53d7b8a3e9fb8597c467a046e 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -424,7 +424,7 @@ If ALSO-C-SOURCE is non-nil, instead of returning `C-source',
 this function will attempt to locate the definition of OBJECT in
 the C sources, too."
   (let* ((autoloaded (autoloadp type))
-        (file-name (or (and autoloaded (autoload-file type))
+        (file-name (or (and autoloaded (nth 1 type))
                        (symbol-file
                          ;; FIXME: Why do we have this weird "If TYPE is the
                          ;; value returned by `symbol-function' for a function