]> git.eshelyaron.com Git - emacs.git/commitdiff
(find-lisp-object-file-name): When looking for autoloaded
authorGlenn Morris <rgm@gnu.org>
Tue, 15 Sep 2009 02:35:47 +0000 (02:35 +0000)
committerGlenn Morris <rgm@gnu.org>
Tue, 15 Sep 2009 02:35:47 +0000 (02:35 +0000)
variables, also consider the .elc files, since the .el files are
normally gzipped (subsequent code locates the .el.gz from the .elc).

lisp/help-fns.el

index de60cd5fea23d3b3c8002b4992a4e5d399a6e6dc..2425310cd93840604284acf6431c223b8fcc491c 100644 (file)
@@ -267,8 +267,9 @@ suitable file is found, return nil."
                   "^;;; Generated autoloads from \\(.*\\)" nil t)
              (setq file-name
                    (locate-file
-                    (match-string-no-properties 1)
-                    load-path nil 'readable))))))))
+                    (file-name-sans-extension
+                     (match-string-no-properties 1))
+                    load-path '(".el" ".elc") 'readable))))))))
 
     (cond
      ((and (not file-name) (subrp type))