diff options
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/dpkg-distaddfile.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/scripts/dpkg-distaddfile.pl b/scripts/dpkg-distaddfile.pl index 1bc1901e5..1229b22fa 100755 --- a/scripts/dpkg-distaddfile.pl +++ b/scripts/dpkg-distaddfile.pl @@ -92,6 +92,7 @@ if (open(my $fileslist_fh, '<', $fileslistfile)) { print($fileslistnew_fh "$_\n") || syserr(_g("copy old entry to new files list file")); } + close $fileslist_fh or syserr(_g('cannot close %s'), $fileslistfile); } elsif ($! != ENOENT) { syserr(_g("read old files list file")); } |