Mercurial > hg > xemacs-beta

comparison lisp/loadup.el @ 440:8de8e3f6228a r21-2-28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 3ecd8885ac67
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
49 49
50 ;; This is awfully damn early to be getting an error, right? 50 ;; This is awfully damn early to be getting an error, right?
51 (call-with-condition-handler 'really-early-error-handler 51 (call-with-condition-handler 'really-early-error-handler
52 #'(lambda () 52 #'(lambda ()
53 53
54 ;; Initializa Installation-string. We do it before loading 54 ;; Initialize Installation-string. We do it before loading
55 ;; anything so that dumped code can make use of its value. 55 ;; anything so that dumped code can make use of its value.
56 (setq Installation-string 56 (setq Installation-string
57 (save-current-buffer 57 (save-current-buffer
58 (set-buffer (get-buffer-create (generate-new-buffer-name 58 (set-buffer (get-buffer-create (generate-new-buffer-name
59 " *temp*"))) 59 " *temp*")))