summaryrefslogtreecommitdiffstats
path: root/perl-install/authentication.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/authentication.pm')
-rw-r--r--perl-install/authentication.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm
index ce9ac04d6..4420911d9 100644
--- a/perl-install/authentication.pm
+++ b/perl-install/authentication.pm
@@ -420,8 +420,7 @@ sub set_pam_authentication {
}
if ($module eq 'pam_unix' && $special{$type}) {
my @para_for_last =
- $type eq 'auth' ? qw(likeauth nullok use_first_pass) :
- $type eq 'account' ? qw(use_first_pass) : @{[]};
+ member($type, 'auth', 'account') ? qw(use_first_pass) : @{[]};
@para = difference2(\@para, \@para_for_last);
my ($before_noask, $ask) = partition { $_ eq 'castella' } @{$special{$type}};