summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/media.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index 576f59ba2..9dbfaabf9 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -377,7 +377,7 @@ sub get_file_and_size {
my $f2 = path($phys_m, $f);
if (! -f $f2) {
- change_phys_medium($phys_m, $f);
+ change_phys_medium($phys_m, $f, $::o->{packages});
}
open_file_and_size($f2);
}
@@ -580,7 +580,7 @@ sub url2mounted_phys_medium {
my $phys_m = url2phys_medium($o, $url);
$phys_m->{name} = $o_name if $o_name; #- useful for CDs which prompts a name in change_phys_medium
- change_phys_medium($phys_m, $o_rel_file) or return;
+ change_phys_medium($phys_m, $o_rel_file, $o->{packages}) or return;
$phys_m;
}