X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/45970e731c7e0c8a3d469a1c344af20c18987c20..f28770a79b9d60fd2a09fd121563abcf36318ee4:/t/Support/TestSetup.pm diff --git a/t/Support/TestSetup.pm b/t/Support/TestSetup.pm index c23b4fd7f..5b6e2bb1f 100644 --- a/t/Support/TestSetup.pm +++ b/t/Support/TestSetup.pm @@ -33,7 +33,7 @@ sub _login { require "bin/mozilla/common.pl"; - die "cannot find user $login" unless %::myconfig = $::auth->read_user($login); + die "cannot find user $login" unless %::myconfig = $::auth->read_user(login => $login); $::form->{login} = $login; # normaly implicit at login