Mercurial > emacs

diff lisp/startup.el @ 883:5a7ed0421c9d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Roland McGrath <roland@gnu.org>
date Mon, 27 Jul 1992 17:41:57 +0000
parents 6d05b6b123d5
children 5430eac8f453
line wrap: on
line diff
--- a/lisp/startup.el	Mon Jul 27 08:52:26 1992 +0000
+++ b/lisp/startup.el	Mon Jul 27 17:41:57 1992 +0000
@@ -141,8 +141,6 @@
     (setq default-directory (abbreviate-file-name default-directory))
     (unwind-protect
 	(command-line)
-      ;; Run the site-start library if it exists.
-      (load "site-start" t t)
       (run-hooks 'emacs-startup-hook)
       (and term-setup-hook
 	   (run-hooks 'term-setup-hook))
@@ -213,6 +211,11 @@
 
   (run-hooks 'before-init-hook)
 
+  ;; Run the site-start library if it exists.  The point of this file is
+  ;; that it is run before .emacs.  There is no point in doing this after
+  ;; .emacs; that is useless.
+  (load "site-start" t t)
+
   ;; Load that user's init file, or the default one, or none.
   (let ((debug-on-error init-file-debug)
 	;; This function actually reads the init files.