(find-library-name): Don't forget the empty suffix. Fix stale variable name.

This commit is contained in:
Stefan Monnier 2002-09-12 21:48:20 +00:00
parent df52e0e7ac
commit 4dbf594b9f

View file

@ -125,8 +125,8 @@ See the functions `find-function' and `find-variable'."
(setq library (replace-match "" t t library 1)))
(or (locate-file library
(or find-function-source-path load-path)
(find-library-suffixes))
(error "Can't find library %s" file)))
(append (find-library-suffixes) ""))
(error "Can't find library %s" library)))
;;;###autoload
(defun find-library (library)