No functional change.
Signed-off-by: Ian Jackson <Ian.Jackson@eu.citrix.com>
my $dump = "$ENV{'CAHTEST_HOME'}/test-data";
-my $verifier = CGI::Auth::Flexible->new_verifier(
+my @verifier_params =(
username_password_error => sub {
my ($c,$r,$u,$p)=@_;
return $p eq 'sesame' ? undef : 'wrong password'
promise_check_mutate => 1,
dir => $dump,
srcdump_filter_cwd => 0,
-);
+ );
+
+my $verifier = CGI::Auth::Flexible->new_verifier(@verifier_params);
END { $verifier->disconnect() if $verifier; }