summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-05 14:23:45 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-05 14:23:45 +0000
commitb603bef796f6a4cc06f6f0406bc7d6971397183b (patch)
treec22e942022c67c22c0063e44773d5b7f8c7fc235 /perl-install
parentcdd776cc5d68aba2094f5d7b6c1f5b989a122b3f (diff)
downloaddrakx-backup-do-not-use-b603bef796f6a4cc06f6f0406bc7d6971397183b.tar
drakx-backup-do-not-use-b603bef796f6a4cc06f6f0406bc7d6971397183b.tar.gz
drakx-backup-do-not-use-b603bef796f6a4cc06f6f0406bc7d6971397183b.tar.bz2
drakx-backup-do-not-use-b603bef796f6a4cc06f6f0406bc7d6971397183b.tar.xz
drakx-backup-do-not-use-b603bef796f6a4cc06f6f0406bc7d6971397183b.zip
(setPackages) perl_checker fix
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/any.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index f89a05477..9333c708c 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -321,6 +321,7 @@ sub setPackages {
$o->{packages} = install::pkgs::empty_packages($o->{keep_unrequested_dependencies});
my $media = $o->{media} || [ { type => 'media_cfg', url => 'drakx://media' } ];
+ my ($suppl_method, $copy_rpms_on_disk);
{
my @errors;
@@ -328,7 +329,7 @@ sub setPackages {
log::l("urpmi error: $_[0]");
push @errors, @_;
};
- my ($suppl_method, $copy_rpms_on_disk) = install::media::get_media($o, $media, $o->{packages});
+ ($suppl_method, $copy_rpms_on_disk) = install::media::get_media($o, $media, $o->{packages});
if ($suppl_method) {
1 while $o->selectSupplMedia;