mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-02 05:32:08 -08:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
Roland McGrath 1992-07-27 17:41:57 +00:00
parent 4da319370e
commit 09973c543f
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/startup.el
View file

@ -141,8 +141,6 @@ directory name of the directory where the `.emacs' file was looked for.")
(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 @@ directory name of the directory where the `.emacs' file was looked for.")
(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.