aboutsummaryrefslogtreecommitdiffstats
path: root/Packdrakeng.pm
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-01-07 12:38:30 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-01-07 12:38:30 +0000
commitf534f471f1e3b8117085d42206e4912dad842650 (patch)
tree6d6c40b9e97290e5ef5c744b480d9dba23bf3571 /Packdrakeng.pm
parenta035820bcdc4dcbaf8a36c23ea1d724adf6cf4bc (diff)
downloadrpmtools-f534f471f1e3b8117085d42206e4912dad842650.tar
rpmtools-f534f471f1e3b8117085d42206e4912dad842650.tar.gz
rpmtools-f534f471f1e3b8117085d42206e4912dad842650.tar.bz2
rpmtools-f534f471f1e3b8117085d42206e4912dad842650.tar.xz
rpmtools-f534f471f1e3b8117085d42206e4912dad842650.zip
More filehandle cleanup
Diffstat (limited to 'Packdrakeng.pm')
-rw-r--r--Packdrakeng.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/Packdrakeng.pm b/Packdrakeng.pm
index 0eaa6ed..d2427b9 100644
--- a/Packdrakeng.pm
+++ b/Packdrakeng.pm
@@ -160,7 +160,8 @@ sub DESTROY {
my ($pack) = @_;
$pack->{subuncompress}($pack, undef, undef);
$pack->build_toc();
- close($pack->{handle}) if ($pack->{handle});
+ close($pack->{handle}) if $pack->{handle};
+ close($pack->{ustream_data}{handle}) if $pack->{ustream_data}{handle};
}
# Flush current compressed block