From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 17 Jul 1995 22:20:32 +0000 (+0000)
Subject: (Fwrite_region): If fsync fails with EINTR, don't
X-Git-Tag: emacs-19.34~3319
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb33c142fee963b88e286b235ebda9d2259c61a6;p=emacs.git

(Fwrite_region): If fsync fails with EINTR, don't
report a Lisp error.
---

diff --git a/src/fileio.c b/src/fileio.c
index d1ac36c2533..19706a19873 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3370,7 +3370,11 @@ to the file, instead of any buffer contents, and END is ignored.")
   /* mib says that closing the file will try to write as fast as NFS can do
      it, and that means the fsync here is not crucial for autosave files.  */
   if (!auto_saving && fsync (desc) < 0)
-    failure = 1, save_errno = errno;
+    {
+      /* If fsync fails with EINTR, don't treat that as serious.  */
+      if (errno != EINTR)
+	failure = 1, save_errno = errno;
+    }
 #endif
 
   /* Spurious "file has changed on disk" warnings have been