Re: Special treatment of `term-setup-hook'

[Juanma Barranquero]

On 10/24/06, Juanma Barranquero <address@hidden> wrote:

> What is so special in `term-setup-hook' that precludes simply doing
>
>  (run-hooks 'emacs-startup-hook)
>  (run-hooks 'term-setup-hook)

Will someone object to this patch?

                   /L/e/k/t/u


Index: lisp/startup.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/startup.el,v
retrieving revision 1.422
diff -u -2 -r1.422 startup.el
--- lisp/startup.el     28 Nov 2006 16:46:33 -0000      1.422
+++ lisp/startup.el     7 Dec 2006 00:59:01 -0000
@@ -431,6 +431,5 @@
        (unless inhibit-startup-hooks
          (run-hooks 'emacs-startup-hook)
-         (and term-setup-hook
-              (run-hooks 'term-setup-hook)))
+         (run-hooks 'term-setup-hook))

        ;; Don't do this if we failed to create the initial frame,
@@ -1916,9 +1915,8 @@

    ;; If there are no switches to process, we might as well
-    ;; run this hook now, and there may be some need to do it
+    ;; run these hooks now, and there may be some need to do it
    ;; before doing any output.
    (run-hooks 'emacs-startup-hook)
-    (and term-setup-hook
-        (run-hooks 'term-setup-hook))
+    (run-hooks 'term-setup-hook)
    (setq inhibit-startup-hooks t)