summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index de60cd5fea2..2425310cd93 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -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))