X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cff0e9be7e6925c22dab7cb0b52ab9e23af0d56a..28ef3d6c70c5f45344ce1b4a40950fcbadc6acdc:/scripts/console

diff --git a/scripts/console b/scripts/console
index 1d9758138..0c06dbf5a 100755
--- a/scripts/console
+++ b/scripts/console
@@ -118,6 +118,7 @@ sub lxinit {
   die "cannot find user $login"            unless %::myconfig = $::auth->read_user(login => $login);
 
   die "cannot find locale for user $login" unless $::locale   = Locale->new($::myconfig{countrycode});
+  $::myconfig{login} = $login; # so SL::DB::Manager::Employee->current works in test database
 
   $::instance_conf->init;