emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/loadup.el [lexbind]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/loadup.el [lexbind]
Date: Tue, 14 Oct 2003 19:52:09 -0400

Index: emacs/lisp/loadup.el
diff -c emacs/lisp/loadup.el:1.123.2.1 emacs/lisp/loadup.el:1.123.2.2
*** emacs/lisp/loadup.el:1.123.2.1      Fri Apr  4 01:20:09 2003
--- emacs/lisp/loadup.el        Tue Oct 14 19:51:16 2003
***************
*** 48,54 ****
  ;; We don't want to have any undo records in the dumped Emacs.
  (buffer-disable-undo "*scratch*")
  
! (load "byte-run")
  (load "emacs-lisp/backquote")
  (load "subr")
  
--- 48,54 ----
  ;; We don't want to have any undo records in the dumped Emacs.
  (buffer-disable-undo "*scratch*")
  
! (load "emacs-lisp/byte-run")
  (load "emacs-lisp/backquote")
  (load "subr")
  
***************
*** 57,63 ****
  
  (load "widget")
  (load "custom")
! (load "map-ynp")
  (load "env")
  (load "cus-start")
  (load "international/mule")
--- 57,63 ----
  
  (load "widget")
  (load "custom")
! (load "emacs-lisp/map-ynp")
  (load "env")
  (load "cus-start")
  (load "international/mule")
***************
*** 139,145 ****
        (and (boundp 'x-toolkit-scroll-bars)
           (load "scroll-bar"))
        (load "select")))
! (load "timer")
  (load "isearch")
  
  (message "%s" (garbage-collect))
--- 139,145 ----
        (and (boundp 'x-toolkit-scroll-bars)
           (load "scroll-bar"))
        (load "select")))
! (load "emacs-lisp/timer")
  (load "isearch")
  
  (message "%s" (garbage-collect))
***************
*** 185,191 ****
        (load "ls-lisp")))
  (if (fboundp 'atan)   ; preload some constants and
      (progn            ; floating pt. functions if we have float support.
!       (load "float-sup")))
  (message "%s" (garbage-collect))
  
  (load "vc-hooks")
--- 185,191 ----
        (load "ls-lisp")))
  (if (fboundp 'atan)   ; preload some constants and
      (progn            ; floating pt. functions if we have float support.
!       (load "emacs-lisp/float-sup")))
  (message "%s" (garbage-collect))
  
  (load "vc-hooks")
***************
*** 301,306 ****
--- 301,309 ----
  ;;; At this point, we're ready to resume undo recording for scratch.
  (buffer-enable-undo "*scratch*")
  
+ (if (null (garbage-collect))
+     (setq pure-space-overflow t))
+ 
  (if (or (member (nth 3 command-line-args) '("dump" "bootstrap"))
        (member (nth 4 command-line-args) '("dump" "bootstrap")))
      (if (eq system-type 'vax-vms)
***************
*** 353,356 ****
--- 356,361 ----
  ;;; no-byte-compile: t
  ;;; no-update-autoloads: t
  ;;; End:
+ 
+ ;;; arch-tag: 121e1dd4-36e1-45ac-860e-239f577a6335
  ;;; loadup.el ends here




reply via email to

[Prev in Thread] Current Thread [Next in Thread]