diff options
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index 40016cec928..6186577079e 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el | |||
| @@ -125,8 +125,8 @@ See the functions `find-function' and `find-variable'." | |||
| 125 | (setq library (replace-match "" t t library 1))) | 125 | (setq library (replace-match "" t t library 1))) |
| 126 | (or (locate-file library | 126 | (or (locate-file library |
| 127 | (or find-function-source-path load-path) | 127 | (or find-function-source-path load-path) |
| 128 | (find-library-suffixes)) | 128 | (append (find-library-suffixes) "")) |
| 129 | (error "Can't find library %s" file))) | 129 | (error "Can't find library %s" library))) |
| 130 | 130 | ||
| 131 | ;;;###autoload | 131 | ;;;###autoload |
| 132 | (defun find-library (library) | 132 | (defun find-library (library) |