Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-25 14:27:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

(describe-simplify-lib-file-name): Fix regexp.

Browse source
This commit is contained in:
Romain Francoise 2005-10-29 14:12:08 +00:00
parent feb2f36476
commit 1cf586a447
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2005-10-29 Romain Francoise <romain@orebokech.com>
* help-fns.el (describe-simplify-lib-file-name): Fix regexp.
2005-10-29 Ken Manheimer <ken.manheimer@gmail.com>
* pgg-gpg.el

2
lisp/help-fns.el
View file

@ -291,7 +291,7 @@ face (according to `face-differs-from-default-p')."
;; Now convert that back to a file name and see if we get
;; the original one. If so, they are equivalent.
(if (equal file (locate-file libname load-path '("")))
(if (string-match "[.]elc?\\'" libname)
(if (string-match "[.]elc\\'" libname)
(substring libname 0 -1)
libname)
file))))