Mercurial > hg > xemacs-beta

diff lisp/update-elc.el @ 263:727739f917cb r20-5b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b30
author cvs
date Mon, 13 Aug 2007 10:24:41 +0200
parents 89ec2bb86eea
children 8efd647ea9ca
line wrap: on
line diff
--- a/lisp/update-elc.el	Mon Aug 13 10:23:52 2007 +0200
+++ b/lisp/update-elc.el	Mon Aug 13 10:24:41 2007 +0200
@@ -98,7 +98,8 @@
   (while preloaded-file-list
     (let ((arg (car preloaded-file-list)))
       ;; (print (prin1-to-string arg))
-      (if (null (member arg packages-unbytecompiled-lisp))
+      (if (null (member (file-name-nondirectory arg)
+			packages-unbytecompiled-lisp))
 	  (progn
 	    (setq arg (locate-library arg))
 	    (if (null arg)