[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: find-library-name fails if file (with no extension) exists.
From: |
Juanma Barranquero |
Subject: |
Re: find-library-name fails if file (with no extension) exists. |
Date: |
Wed, 22 Nov 2006 13:35:17 +0100 |
On 11/22/06, Juanma Barranquero <address@hidden> wrote:
This simple patch does fix the problem.
This one makes even more sense, because library is not modified, so
the error message still refers to the library passed to the func.
/L/e/k/t/u
Index: lisp/emacs-lisp/find-func.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emacs-lisp/find-func.el,v
retrieving revision 1.78
diff -u -2 -r1.78 find-func.el
--- lisp/emacs-lisp/find-func.el 21 Nov 2006 20:06:53 -0000 1.78
+++ lisp/emacs-lisp/find-func.el 22 Nov 2006 12:29:12 -0000
@@ -150,7 +150,6 @@
;; If the library is byte-compiled, try to find a source library by
;; the same name.
- (if (string-match "\\.el\\(c\\(\\..*\\)?\\)\\'" library)
- (setq library (replace-match "" t t library)))
- (or (locate-file library
+ (or (locate-file (replace-regexp-in-string "\\.elc\\(\\..*\\)?\\'" ".el"
+ library t t)
(or find-function-source-path load-path)
(append (find-library-suffixes) load-file-rep-suffixes))
- find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Romain Francoise, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Romain Francoise, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Romain Francoise, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists.,
Juanma Barranquero <=
- Re: find-library-name fails if file (with no extension) exists., Romain Francoise, 2006/11/22
- Message not available
- find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists., Romain Francoise, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists., Lennart Borgman, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/22
- Re: find-library-name fails if file (with no extension) exists., Eli Zaretskii, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Andreas Schwab, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Lennart Borgman, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/21
- Re: find-library-name fails if file (with no extension) exists., Juanma Barranquero, 2006/11/21