comparison lisp/update-elc.el @ 235:85a06df23a9a r20-5b16

Import from CVS: tag r20-5b16
author cvs
date Mon, 13 Aug 2007 10:14:40 +0200
parents 0e522484dd2a
children 89ec2bb86eea
comparison
equal deleted inserted replaced
234:946e7f6ce379 235:85a06df23a9a
63 ; (nthcdr 3 command-line-args)))) 63 ; (nthcdr 3 command-line-args))))
64 64
65 (define-function 'defalias 'define-function) 65 (define-function 'defalias 'define-function)
66 (require 'packages) 66 (require 'packages)
67 67
68 (let ((autol (list-autoloads))) 68 (let ((autol (packages-list-autoloads)))
69 ;; (print (prin1-to-string autol)) 69 ;; (print (prin1-to-string autol))
70 (while autol 70 (while autol
71 (let ((src (car autol))) 71 (let ((src (car autol)))
72 (if (and (file-exists-p src) 72 (if (and (file-exists-p src)
73 (file-newer-than-file-p src (concat src "c"))) 73 (file-newer-than-file-p src (concat src "c")))