Mercurial > hg > xemacs-beta
comparison lisp/packages.el @ 247:e70b3a057e12 r20-5b22
Import from CVS: tag r20-5b22
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:18:21 +0200 |
parents | f220cc83d72e |
children | 157b30c96d03 |
comparison
equal
deleted
inserted
replaced
246:cf2a77a48c1c | 247:e70b3a057e12 |
---|---|
321 | 321 |
322 ;; Locate and process a dumped-lisp.el file if it exists | 322 ;; Locate and process a dumped-lisp.el file if it exists |
323 (if (and (running-temacs-p) | 323 (if (and (running-temacs-p) |
324 (file-exists-p (concat dir "/dumped-lisp.el"))) | 324 (file-exists-p (concat dir "/dumped-lisp.el"))) |
325 (let (package-lisp) | 325 (let (package-lisp) |
326 (load (concat dir "/dumped-lisp.el")) | 326 (let (preloaded-file-list) |
327 (load (concat dir "/dumped-lisp.el"))) | |
327 (if package-lisp | 328 (if package-lisp |
328 (progn | 329 (progn |
329 (if (boundp 'preloaded-file-list) | 330 (if (boundp 'preloaded-file-list) |
330 (setq preloaded-file-list | 331 (setq preloaded-file-list |
331 (append preloaded-file-list package-lisp))) | 332 (append preloaded-file-list package-lisp))) |