diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-15 21:31:11 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-15 21:31:11 +0000 |
| commit | 9cdb9f0d0ea484f8454be24d94a4e179138c70b8 (patch) | |
| tree | e8fef59b2d476a8aba48a1edf828888ec9e87df6 /perl-install/any.pm | |
| parent | fb2657dc463c4f3053ba243654aa1271ffa4588c (diff) | |
| download | drakx-backup-do-not-use-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar drakx-backup-do-not-use-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.gz drakx-backup-do-not-use-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.bz2 drakx-backup-do-not-use-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.tar.xz drakx-backup-do-not-use-9cdb9f0d0ea484f8454be24d94a4e179138c70b8.zip | |
no_comment
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index d66282fc7..3dc8f5b8b 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -111,7 +111,7 @@ You can add some more or change the existing ones."), if ($c eq "Add") { my @labels = map { $_->{label} } @{$b->{entries}}; my $prefix; - if ($in->ask_from_list_('', _("Which type of entry do you want to add"), [ __("Linux"), __("Other OS (windows...)") ]) eq "Linux") { + if ($in->ask_from_list_('', _("Which type of entry do you want to add?"), [ __("Linux"), __("Other OS (windows...)") ]) eq "Linux") { $e = { type => 'image' }; $prefix = "linux"; } else { @@ -155,7 +155,7 @@ _("Default") => { val => \$default, type => 'bool' }, '', \@l, complete => sub { $e->{label} or $in->ask_warn('', _("Empty label not allowed")), return 1; - member($e->{label}, map { $_->{label} } grep { $_ != $e } @{$b->{entries}}) and $in->ask_warn('', _("This label is already in use")), return 1; + member($e->{label}, map { $_->{label} } grep { $_ != $e } @{$b->{entries}}) and $in->ask_warn('', _("This label is already used")), return 1; 0; })) { $b->{default} = $old_default || $default ? $default && $e->{label} : $b->{default}; |