From: Frank Lichtenheld <djpig@debian.org>
Date: Sat, 22 Sep 2007 19:49:20 +0000 (+0200)
Subject: dpkg-shlibdeps: Close file descriptor after use
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ba56d637aa7c4792c477bae452cbecb3211a8a7c;p=dpkg

dpkg-shlibdeps: Close file descriptor after use

Unneeded file descriptors should be closed ASAP.
---

diff --git a/scripts/dpkg-shlibdeps.pl b/scripts/dpkg-shlibdeps.pl
index 7fa7e990..327f3196 100755
--- a/scripts/dpkg-shlibdeps.pl
+++ b/scripts/dpkg-shlibdeps.pl
@@ -200,6 +200,7 @@ if ($stdout) {
 	    print(NEW $entry) ||
 		syserr(sprintf(_g("copy old entry to new varlist file \`%s'"), "$varlistfile.new"));
 	}
+	close(OLD);
     }
     $fh = \*NEW;
 }