(xfclose): Don't try to flush stdin, only stdout.

Otherwise, at least Ultrix-4.3's fflush would return EOF.
Reported by Jim Blandy (jimb@cyclic.com).

diff --git a/src/sort.c b/src/sort.c
index da7e0034b6f3c7673f8f1235d686ef50a4fe459e..a216e6bbaf73cc88b1fae485a036a0d09a91784a 100644 (file)
--- a/src/sort.c
+++ b/src/sort.c
@@ -266,26 +266,29 @@ static void
 xfclose (fp)
      FILE *fp;
 {
-  if (fflush (fp) != 0)
+  if (fp == stdin)
     {
-      error (0, errno, "flushing file");
-      cleanup ();
-      exit (2);
+      /* Allow reading stdin from tty more than once. */
+      if (feof (fp))
+       clearerr (fp);
     }
-
-  if (fp != stdin && fp != stdout)
+  else if (fp == stdout)
     {
-      if (fclose (fp) != 0)
+      if (fflush (fp) != 0)
        {
-         error (0, errno, "error closing file");
+         error (0, errno, "flushing file");
          cleanup ();
          exit (2);
        }
     }
   else
     {
-      /* Allow reading stdin from tty more than once. */
-      clearerr (fp);
+      if (fclose (fp) != 0)
+       {
+         error (0, errno, "error closing file");
+         cleanup ();
+         exit (2);
+       }
     }
 }