270 |
so as to override the definitions made by the terminal-specific file. |
so as to override the definitions made by the terminal-specific file. |
271 |
Emacs never sets this variable itself.") |
Emacs never sets this variable itself.") |
272 |
|
|
273 |
|
(defvar inhibit-startup-hooks nil |
274 |
|
"Non-nil means don't run `term-setup-hook' and `emacs-startup-hook'. |
275 |
|
This is because we already did so.") |
276 |
|
|
277 |
(defvar keyboard-type nil |
(defvar keyboard-type nil |
278 |
"The brand of keyboard you are using. |
"The brand of keyboard you are using. |
279 |
This variable is used to define |
This variable is used to define |
500 |
auto-save-list-file-prefix |
auto-save-list-file-prefix |
501 |
(emacs-pid) |
(emacs-pid) |
502 |
(system-name)))))))) |
(system-name)))))))) |
503 |
(run-hooks 'emacs-startup-hook) |
(unless inhibit-startup-hooks |
504 |
(and term-setup-hook |
(run-hooks 'emacs-startup-hook) |
505 |
(run-hooks 'term-setup-hook)) |
(and term-setup-hook |
506 |
|
(run-hooks 'term-setup-hook))) |
507 |
|
|
508 |
;; Don't do this if we failed to create the initial frame, |
;; Don't do this if we failed to create the initial frame, |
509 |
;; for instance due to a dense colormap. |
;; for instance due to a dense colormap. |
1760 |
;; If there are no switches to process, we might as well |
;; If there are no switches to process, we might as well |
1761 |
;; run this hook now, and there may be some need to do it |
;; run this hook now, and there may be some need to do it |
1762 |
;; before doing any output. |
;; before doing any output. |
1763 |
|
(run-hooks 'emacs-startup-hook) |
1764 |
(and term-setup-hook |
(and term-setup-hook |
1765 |
(run-hooks 'term-setup-hook)) |
(run-hooks 'term-setup-hook)) |
1766 |
;; Don't let the hook be run twice. |
(setq inhibit-startup-hooks t) |
|
(setq term-setup-hook nil) |
|
1767 |
|
|
1768 |
;; It's important to notice the user settings before we |
;; It's important to notice the user settings before we |
1769 |
;; display the startup message; otherwise, the settings |
;; display the startup message; otherwise, the settings |