From 1cf586a447d772dab3aff337b983f6cb4cc28b0d Mon Sep 17 00:00:00 2001 From: Romain Francoise Date: Sat, 29 Oct 2005 14:12:08 +0000 Subject: [PATCH] (describe-simplify-lib-file-name): Fix regexp. --- lisp/ChangeLog | 4 ++++ lisp/help-fns.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fbb9692b6b2..2dcc50d873a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2005-10-29 Romain Francoise + + * help-fns.el (describe-simplify-lib-file-name): Fix regexp. + 2005-10-29 Ken Manheimer * pgg-gpg.el diff --git a/lisp/help-fns.el b/lisp/help-fns.el index cffe313fd6c..88f32003867 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -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)))) -- 2.39.2