summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/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 7818c48e3..54ae9001b 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -520,10 +520,10 @@ sub get_media {
}
sub adjust_paths_in_urpmi_cfg {
- my ($packages) = @_;
+ my ($urpm) = @_;
require Clone;
- my ($urpm) = Clone::clone($packages);
+ local $urpm->{media} = Clone::clone($urpm->{media});
foreach my $medium (@{$urpm->{media}}) {
my $phys_m = $medium->{phys_medium};
if ($phys_m->{method} eq 'cdrom') {