summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2010-02-03 23:38:00 +0000
committerThierry Vignaud <tv@mandriva.org>2010-02-03 23:38:00 +0000
commitdae8a3a9b97cedf4d4066239693da20aceba5f23 (patch)
tree9729acb8780237a68b565faa30dd3c007c2dcb0d /perl-install/any.pm
parent43809d04b01230a1db54d47b97d0154853871374 (diff)
downloaddrakx-backup-do-not-use-dae8a3a9b97cedf4d4066239693da20aceba5f23.tar
drakx-backup-do-not-use-dae8a3a9b97cedf4d4066239693da20aceba5f23.tar.gz
drakx-backup-do-not-use-dae8a3a9b97cedf4d4066239693da20aceba5f23.tar.bz2
drakx-backup-do-not-use-dae8a3a9b97cedf4d4066239693da20aceba5f23.tar.xz
drakx-backup-do-not-use-dae8a3a9b97cedf4d4066239693da20aceba5f23.zip
(setupBootloader__general) make restrict's 'validate' callback more readable
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 492d8da4f..0a5df8811 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -427,8 +427,12 @@ sub setupBootloader__general {
} },
{ label => N("Password (again)"), val => \$b->{password2}, hidden => 1 },
{ text => N("Restrict command line options"), val => \$b->{restricted}, type => "bool",
- text => N("restrict"), advanced => 1
- validate => sub { my $ok = !$b->{restricted} || $b->{password} or $in->ask_warn('', N("Option ``Restrict command line options'' is of no use without a password")); $ok } },
+ text => N("restrict"), advanced => 1,
+ validate => sub {
+ my $ok = !$b->{restricted} || $b->{password}
+ or $in->ask_warn('', N("Option ``Restrict command line options'' is of no use without a password"));
+ $ok;
+ } },
{ text => N("Clean /tmp at each boot"), val => \$clean_tmp, type => 'bool', advanced => 1 },
]) or return 0;
} else {