summaryrefslogtreecommitdiffstats
path: root/perl-install/install/any.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-10 14:06:58 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-10 14:06:58 +0000
commit86923e25769200fc73586e574c3580a646294ede (patch)
treeff4314cff9b34c858285b85c2ca5bcc4ad34c5aa /perl-install/install/any.pm
parent1fae25c2a0b343d3488648ef45b793c3d649cbc2 (diff)
downloaddrakx-86923e25769200fc73586e574c3580a646294ede.tar
drakx-86923e25769200fc73586e574c3580a646294ede.tar.gz
drakx-86923e25769200fc73586e574c3580a646294ede.tar.bz2
drakx-86923e25769200fc73586e574c3580a646294ede.tar.xz
drakx-86923e25769200fc73586e574c3580a646294ede.zip
(media_screen) log choosen media
Diffstat (limited to 'perl-install/install/any.pm')
-rw-r--r--perl-install/install/any.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index 26bbe9f0b..29fd8e1de 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -419,6 +419,8 @@ sub setPackages {
install::pkgs::start_pushing_error();
media_screen($o) if !$::auto_install;
+ my @choosen_media = map { $_->{name} } grep { !$_->{ignore} } @{$urpm->{media}};
+ log::l("choosen media: ", join(',', @choosen_media));
# actually read synthesis now we have all the ones we want:
require urpm::media;