gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

installer: always accept default value as valid

This commit is contained in:
Galen Charlton 2007-12-14 15:45:41 -06:00
parent b8a58c4934
commit 3f5c71daa5
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Makefile.PL
View File

@ -850,7 +850,10 @@ sub _get_value {
}
my $val = prompt($msg, $default);
while (exists $valid_values->{$key} and not exists $valid_values->{$key}->{$val}) {
while (exists $valid_values->{$key} and
$val ne $default and
not exists $valid_values->{$key}->{$val}) {
my $retry_msg = "Value '$val' is not a valid option.\n";
$retry_msg .= "Please enter a value";
$retry_msg .= _add_valid_values_disp($key, $valid_values);