Mercurial > hg > xemacs-beta

comparison lisp/loadup.el @ 249:83b3d10dcba9 r20-5b23

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b23
author cvs
date Mon, 13 Aug 2007 10:19:09 +0200
parents e70b3a057e12
children 677f6a0ee643
comparison
equal deleted inserted replaced
248:ad40ac2754d8 249:83b3d10dcba9
182 ;; Dump into the name `xemacs' (only) 182 ;; Dump into the name `xemacs' (only)
183 (when (member "dump" command-line-args) 183 (when (member "dump" command-line-args)
184 (message "Dumping under the name xemacs") 184 (message "Dumping under the name xemacs")
185 ;; This is handled earlier in the build process. 185 ;; This is handled earlier in the build process.
186 ;; (condition-case () (delete-file "xemacs") (file-error nil)) 186 ;; (condition-case () (delete-file "xemacs") (file-error nil))
187 (when (fboundp 'really-free) 187 (test-atoms)
188 (really-free)) 188 (when (fboundp 'really-free)
189 (dump-emacs "xemacs" "temacs") 189 (really-free))
190 (kill-emacs)) 190 (test-atoms)
191 (dump-emacs "xemacs" "temacs")
192 (test-atoms)
193 (kill-emacs))
191 194
192 (when (member "run-temacs" command-line-args) 195 (when (member "run-temacs" command-line-args)
193 (message "\nBootstrapping from temacs...") 196 (message "\nBootstrapping from temacs...")
194 (setq purify-flag nil) 197 (setq purify-flag nil)
195 (setq inhibit-package-init t) 198 (setq inhibit-package-init t)