comparison lisp/update-elc.el @ 312:d1b52dcaa789 r21-0b54

Import from CVS: tag r21-0b54
author cvs
date Mon, 13 Aug 2007 10:43:55 +0200
parents c6de09ad3017
children cc15677e0335
comparison
equal deleted inserted replaced
311:b4ad76366919 312:d1b52dcaa789
69 (load "find-paths.el") 69 (load "find-paths.el")
70 (load "packages.el") 70 (load "packages.el")
71 (load "setup-paths.el") 71 (load "setup-paths.el")
72 (load "dump-paths.el") 72 (load "dump-paths.el")
73 73
74 (let ((autol (packages-list-autoloads))) 74 (let ((autol (packages-list-autoloads (concat default-directory "../lisp"))))
75 ;; (print (prin1-to-string autol)) 75 ;; (print (prin1-to-string autol))
76 (while autol 76 (while autol
77 (let ((src (car autol))) 77 (let ((src (car autol)))
78 (if (and (file-exists-p src) 78 (if (and (file-exists-p src)
79 (file-newer-than-file-p src (concat src "c"))) 79 (file-newer-than-file-p src (concat src "c")))