diff options
Diffstat (limited to 'perl-install/install')
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/install/pkgs.pm | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index ed4e7c23f..be96e2c54 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,4 @@ +- allow umounting cdrom during a transaction - really allow having name with "/" in media.cfg Version 10.4.129 - 4 April 2007, by Pascal "Pixel" Rigaux diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index f0a82862d..a367f89b5 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -872,6 +872,7 @@ sub _install_raw { my $medium = packageMedium($packages, $pkg); my $f = $pkg && install::media::rel_rpm_file($medium, $pkg->filename); print $LOG "$f\n"; + undef $fd; $fd = getFile_($medium->{phys_medium}, $f); $fd ? fileno $fd : -1; }, callback_close => sub { |