From: Adam Heath <doogie@debian.org>
Date: Sat, 25 May 2002 03:04:04 +0000 (+0000)
Subject: Close the old debian/files file, before doing a rename.
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=db94ef38009ac38245ebdfe7086ffd31a6cf0ab9;p=dpkg

Close the old debian/files file, before doing a rename.
---

diff --git a/ChangeLog b/ChangeLog
index ab954cad..bcc216a1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Fri May 24 22:06:48 CDT 2002 Adam Heath <doogie@debian.org>
+
+  * scripts/dpkg-gencontrol.pl: Close the old debian/files file,
+    before doing a rename.
+
 Fri May 24 22:00:01 CDT 2002 Adam Heath <doogie@debian.org>
 
   * scripts/dpkg-buildpackage.sh, scripts/dpkg-source.pl,
diff --git a/debian/changelog b/debian/changelog
index bfc8657a..1baf2dbd 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -107,6 +107,8 @@ dpkg (1.10) unstable; urgency=low
     counting all variable expansions.  Closes: #144121.
   * Add -I<filename> to dpkg-buildpackage and dpkg-source, to excludes
     files from tar, when building a native package.  Closes: Bug#75947.
+  * Close the old debian/files file, before doing a rename.  Closes:
+    Bug#111503.
 
  -- Wichert Akkerman <wakkerma@debian.org>  Mon, 20 Aug 2001 14:54:38 +0200
 
diff --git a/scripts/dpkg-gencontrol.pl b/scripts/dpkg-gencontrol.pl
index 38b79d5e..4cfb2c23 100755
--- a/scripts/dpkg-gencontrol.pl
+++ b/scripts/dpkg-gencontrol.pl
@@ -220,6 +220,7 @@ if (open(X,"< $fileslistfile")) {
                 && ($1 eq $oppackage) && ($2 eq $arch || $2 eq 'all');
         print(Y "$_\n") || &syserr("copy old entry to new files list file");
     }
+    close(X) || &syserr("close old files list file");
 } elsif ($! != ENOENT) {
     &syserr("read old files list file");
 }