From: Jim Meyering <jim@meyering.net>
Date: Sun, 8 Oct 1995 04:02:00 +0000 (+0000)
Subject: (main): Close input files.
X-Git-Tag: v4.5.1~12338
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=06ea91f2f332b2041bb598c3a41c10dd9fb3d39f;p=thirdparty%2Fcoreutils.git

(main): Close input files.
---

diff --git a/src/join.c b/src/join.c
index d26b25635a..14a3b7a30c 100644
--- a/src/join.c
+++ b/src/join.c
@@ -815,6 +815,10 @@ main (int argc, char **argv)
     error (1, errno, _("both files cannot be standard input"));
   join (fp1, fp2);
 
+  if (fp1 != stdin && fclose (fp1) == EOF)
+    error (1, errno, "%s", names[0]);
+  if (fp2 != stdin && fclose (fp2) == EOF)
+    error (1, errno, "%s", names[1]);
   if ((fp1 == stdin || fp2 == stdin) && fclose (stdin) == EOF)
     error (1, errno, "-");
   if (ferror (stdout) || fclose (stdout) == EOF)