From 380e25b8ff3b90f5e532641c5c3f891eed6e00f0 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 31 Oct 1996 17:58:56 +0000 Subject: [PATCH] (main): Clear out *Messages* before init_callproc. --- src/emacs.c | 18 +++++++++++------- 1 file changed, 11 insertions(+), 7 deletions(-) diff --git a/src/emacs.c b/src/emacs.c index 2bb7ff2038..c395facaa8 100644 --- a/src/emacs.c +++ b/src/emacs.c @@ -862,6 +862,17 @@ the Bugs section of the Emacs manual or the file BUGS.", argv[0]); 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 @@ the Bugs section of the Emacs manual or the file BUGS.", argv[0]); 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, -- 2.39.2