(do_auto_save_unwind): Don't close DESC if DESC < 0.

(Fdo_auto_save): Unconditionally set up unwind-protect.

diff --git a/src/fileio.c b/src/fileio.c
index 626a69d40f6a05b1a34c5221e5fe83697191f04d..41857c43350579de2edb43051ebe328816efbbdb 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3827,7 +3827,8 @@ do_auto_save_unwind (desc)  /* used as unwind-protect function */
      Lisp_Object desc;
 {
   auto_saving = 0;
-  close (XINT (desc));
+  if (XINT (desc) >= 0)
+    close (XINT (desc));
   return Qnil;
 }
 
@@ -3887,8 +3888,7 @@ A non-nil CURRENT-ONLY argument means save only current buffer.")
   
   /* Arrange to close that file whether or not we get an error.
      Also reset auto_saving to 0.  */
-  if (listdesc >= 0)
-    record_unwind_protect (do_auto_save_unwind, make_number (listdesc));
+  record_unwind_protect (do_auto_save_unwind, make_number (listdesc));
 
   auto_saving = 1;