X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4531a6c712b2529a01f31ddde2ef4d7045d173c7..4ab897fdb1a54cd753ec66ebc8fbd5ffdd883cd6:/t/Support/TestSetup.pm diff --git a/t/Support/TestSetup.pm b/t/Support/TestSetup.pm index 5b6e2bb1f..cb8fd7ffb 100644 --- a/t/Support/TestSetup.pm +++ b/t/Support/TestSetup.pm @@ -11,7 +11,6 @@ use SL::LXDebug; use Data::Dumper; use SL::LxOfficeConf; use SL::InstanceConfiguration; -SL::LxOfficeConf->read; sub _login { my $login = shift; @@ -45,6 +44,8 @@ sub _login { } sub login { + SL::LxOfficeConf->read; + my $login = shift || $::lx_office_conf{testing}{login} || 'demo'; _login($login); }