comparison lisp/packages.el @ 237:89ec2bb86eea r20-5b17

Import from CVS: tag r20-5b17
author cvs
date Mon, 13 Aug 2007 10:15:03 +0200
parents 85a06df23a9a
children 41f2f0e326e9
comparison
equal deleted inserted replaced
236:78d3ccccee6d 237:89ec2bb86eea
233 (let* ((autoload-file (car autoload-list)) 233 (let* ((autoload-file (car autoload-list))
234 (feature (car-safe (file-provides autoload-file)))) 234 (feature (car-safe (file-provides autoload-file))))
235 (when feature 235 (when feature
236 ;; (message "(unload-feature %S)" feature) 236 ;; (message "(unload-feature %S)" feature)
237 (unload-feature feature)) 237 (unload-feature feature))
238 (load autoload-file)) 238 (condition-case nil
239 (load autoload-file)
240 (t nil)))
239 (setq autoload-list (cdr autoload-list))))) 241 (setq autoload-list (cdr autoload-list)))))
240 242
241 ;; The following function cannot be called from a bare temacs 243 ;; The following function cannot be called from a bare temacs
242 (defun packages-reload-dumped-lisp () 244 (defun packages-reload-dumped-lisp ()
243 "Reload new or updated dumped lisp files (with exceptions). 245 "Reload new or updated dumped lisp files (with exceptions).