Mercurial > hg > xemacs-beta

comparison 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
comparison
equal deleted inserted replaced
262:9d8607af9e13 263:727739f917cb
96 packages-useful-lisp 96 packages-useful-lisp
97 site-load-packages)) 97 site-load-packages))
98 (while preloaded-file-list 98 (while preloaded-file-list
99 (let ((arg (car preloaded-file-list))) 99 (let ((arg (car preloaded-file-list)))
100 ;; (print (prin1-to-string arg)) 100 ;; (print (prin1-to-string arg))
101 (if (null (member arg packages-unbytecompiled-lisp)) 101 (if (null (member (file-name-nondirectory arg)
102 packages-unbytecompiled-lisp))
102 (progn 103 (progn
103 (setq arg (locate-library arg)) 104 (setq arg (locate-library arg))
104 (if (null arg) 105 (if (null arg)
105 (progn 106 (progn
106 (print (format "Error: Library file %s not found" 107 (print (format "Error: Library file %s not found"