changeset 4270:3ce8e11f338b

(Fdo_auto_save): Temporarily clear Vquit_flag.
author Richard M. Stallman <rms@gnu.org>
date Sun, 25 Jul 1993 06:00:32 +0000
parents fcbdc9cca97a
children fd05e9662279
files src/fileio.c
diffstat 1 files changed, 8 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/fileio.c	Sun Jul 25 05:38:16 1993 +0000
+++ b/src/fileio.c	Sun Jul 25 06:00:32 1993 +0000
@@ -3004,6 +3004,12 @@
   char *omessage = echo_area_glyphs;
   extern int minibuf_level;
   int do_handled_files;
+  Lisp_Object oquit;
+
+  /* Ordinarily don't quit within this function,
+     but don't make it impossible to quit (in case we get hung in I/O).  */
+  oquit = Vquit_flag;
+  Vquit_flag = Qnil;
 
   /* No GCPRO needed, because (when it matters) all Lisp_Object variables
      point to non-strings reached from Vbuffer_alist.  */
@@ -3078,6 +3084,8 @@
   if (auto_saved && NILP (no_message))
     message1 (omessage ? omessage : "Auto-saving...done");
 
+  Vquit_flag = oquit;
+
   auto_saving = 0;
   return Qnil;
 }