diff options
| -rw-r--r-- | perl-install/authentication.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm index df9eeb2d4..f69be8833 100644 --- a/perl-install/authentication.pm +++ b/perl-install/authentication.pm @@ -13,7 +13,7 @@ sub kind2description { } sub to_kind { my ($authentication) = @_; - (find { $authentication->{$_} } kinds()) || 'local'; + (find { defined $authentication->{$_} } kinds()) || 'local'; } sub ask_parameters { |