summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFlorent Villard <warly@mandriva.com>2004-09-21 09:31:02 +0000
committerFlorent Villard <warly@mandriva.com>2004-09-21 09:31:02 +0000
commit93672c46f35ad098444ea80aaaf3d1ce400e35bf (patch)
tree96a9faa67153d4f9d40de5b6a1b723ec8bb1b5c7
parent5d51fa2316f05e4af65a2797c1aae296503e207f (diff)
downloaddrakx-93672c46f35ad098444ea80aaaf3d1ce400e35bf.tar
drakx-93672c46f35ad098444ea80aaaf3d1ce400e35bf.tar.gz
drakx-93672c46f35ad098444ea80aaaf3d1ce400e35bf.tar.bz2
drakx-93672c46f35ad098444ea80aaaf3d1ce400e35bf.tar.xz
drakx-93672c46f35ad098444ea80aaaf3d1ce400e35bf.zip
temporary workarround to fix extra CD
-rw-r--r--perl-install/pkgs.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 1842f68db..734a321e2 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1109,12 +1109,12 @@ sub install($$$;$$) {
my $medium = packageMedium($packages, $pkg);
my $f = $pkg && $pkg->filename;
print $LOG "$f\n";
- if (isSupplCDMedium($medium)) {
- #- supplementary CD already mounted in /mnt/cdrom
- $fd = install_any::getFile($f, $medium->{descr}, '/mnt/cdrom');
- } else {
- $fd = install_any::getFile($f, $medium->{descr});
- }
+ #if (isSupplCDMedium($medium)) {
+ # #- supplementary CD already mounted in /mnt/cdrom
+ # $fd = install_any::getFile($f, $medium->{descr}, '/mnt/cdrom');
+ #} else {
+ $fd = install_any::getFile($f, $medium->{descr});
+ #}
$fd ? fileno $fd : -1;
}, callback_close => sub {
my ($data, $_type, $id) = @_;