Mercurial > emacs

changeset 16488:65c729d461c3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(main): Clear out *Messages* before init_callproc.
author Richard M. Stallman <rms@gnu.org>
date Thu, 31 Oct 1996 17:58:56 +0000
parents 8e154ff6d4bf
children a6df390c0f5e
files src/emacs.c
diffstat 1 files changed, 11 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/src/emacs.c	Thu Oct 31 17:58:01 1996 +0000
+++ b/src/emacs.c	Thu Oct 31 17:58:56 1996 +0000
@@ -862,6 +862,17 @@
 
   init_callproc_1 ();	/* Must precede init_cmdargs and init_sys_modes.  */
   init_cmdargs (argc, argv, skip_args);	/* Must precede init_lread.  */
+
+  if (initialized)
+    {
+      /* Erase any pre-dump messages in the message log, to avoid confusion */
+      Lisp_Object old_log_max;
+      old_log_max = Vmessage_log_max;
+      XSETFASTINT (Vmessage_log_max, 0);
+      message_dolog ("", 0, 1);
+      Vmessage_log_max = old_log_max;
+    }
+
   init_callproc ();	/* Must follow init_cmdargs but not init_sys_modes.  */
   init_lread ();
 
@@ -1010,13 +1021,6 @@
 
   if (initialized)
     {
-      /* Erase any pre-dump messages in the message log, to avoid confusion */
-      Lisp_Object old_log_max;
-      old_log_max = Vmessage_log_max;
-      XSETFASTINT (Vmessage_log_max, 0);
-      message_dolog ("", 0, 1);
-      Vmessage_log_max = old_log_max;
-
 #ifdef HAVE_TZSET
       {
 	/* If the execution TZ happens to be the same as the dump TZ,