X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/45970e731c7e0c8a3d469a1c344af20c18987c20..231fae2e8af19a1e90627d6cdef5528cc14b44ca:/t/Support/TestSetup.pm?ds=sidebyside 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