From 38da540df8679c8564ae460ca07589f1de469c11 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 29 Dec 2001 20:12:45 +0000 Subject: [PATCH] (Fdo_auto_save): If NO_MESSAGE, don't call push_message. --- src/fileio.c | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/src/fileio.c b/src/fileio.c index ad2d210530d..b1b555fafc4 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -5539,7 +5539,16 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) Lisp_Object lispstream; int count = specpdl_ptr - specpdl; int orig_minibuffer_auto_raise = minibuffer_auto_raise; - int message_p = push_message (); + int message_p = 0; + + if (max_specpdl_size < specpdl_size + 40) + max_specpdl_size = specpdl_size + 40; + + if (minibuf_level) + no_message = Qt; + + if (NILP (no_message)); + message_p = push_message (); /* Ordinarily don't quit within this function, but don't make it impossible to quit (in case we get hung in I/O). */ @@ -5549,9 +5558,6 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) /* No GCPRO needed, because (when it matters) all Lisp_Object variables point to non-strings reached from Vbuffer_alist. */ - if (minibuf_level) - no_message = Qt; - if (!NILP (Vrun_hooks)) call1 (Vrun_hooks, intern ("auto-save-hook")); -- 2.39.2