# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 743580032 0
# Node ID 3ce8e11f338b8c2a063aa5ee82848f86bc39500c
# Parent  fcbdc9cca97af223258a5e434320629767a1de32
(Fdo_auto_save): Temporarily clear Vquit_flag.

diff -r fcbdc9cca97a -r 3ce8e11f338b src/fileio.c
--- 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;
 }