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)))