Mercurial > hg > xemacs-beta
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). |