Mercurial > emacs
changeset 42407:f2c23e762b64
(Fdo_auto_save): If NO_MESSAGE, don't call push_message.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 29 Dec 2001 20:12:45 +0000 |
| parents | 4c72bc09992b |
| children | f8c910bc4ca1 |
| files | src/fileio.c |
| diffstat | 1 files changed, 10 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Sat Dec 29 18:02:49 2001 +0000 +++ b/src/fileio.c Sat Dec 29 20:12:45 2001 +0000 @@ -5539,7 +5539,16 @@ 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 @@ /* 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"));