summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-13 10:42:47 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-13 10:42:47 +0000
commitcac184571db9b3d0f0031b4ffce5d7ad1be0dda5 (patch)
treecc3e4cd4da7089b0c2e49b41d6154c3b1a6c9aff /perl-install/install
parent6fc684eacb2f725e885d6d31c596fad94e67da4b (diff)
downloaddrakx-cac184571db9b3d0f0031b4ffce5d7ad1be0dda5.tar
drakx-cac184571db9b3d0f0031b4ffce5d7ad1be0dda5.tar.gz
drakx-cac184571db9b3d0f0031b4ffce5d7ad1be0dda5.tar.bz2
drakx-cac184571db9b3d0f0031b4ffce5d7ad1be0dda5.tar.xz
drakx-cac184571db9b3d0f0031b4ffce5d7ad1be0dda5.zip
(media_screen) simplify
Diffstat (limited to 'perl-install/install')
-rw-r--r--perl-install/install/any.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index b674b81d8..037474a21 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -368,10 +368,11 @@ sub media_screen {
map {
my $medium = $_;
$medium->{temp_enabled} = !$medium->{ignore};
+ my $name = $medium->{name};
+{
- val => \$medium->{temp_enabled}, type => 'bool', text => $medium->{name},
+ val => \$medium->{temp_enabled}, type => 'bool', text => $name,
# 'Core Release' cannot be unselected:
- disabled => sub { $medium->{name} eq 'Core Release' },
+ disabled => sub { $name eq 'Core Release' },
};
} grep {
my ($distribconf, $medium_path) = @{$_->{mediacfg}};