X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1d64d7e59fe964edde711f52beeb291e092459ab..d6dbee343cd1feeab87638092ae5f8aaec2bfadb:/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