X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=scripts%2Fconsole;h=50febadb60d1842bb73aa98bb33ab75012acb0b1;hb=28d69bb85e934088a56e6e8458cd08d3794e1f8b;hp=8443321e1aff57d664c72c3b491e775c4f5c765c;hpb=18166576c2ebbeb777700de5f290ac3af23a00fd;p=kivitendo-erp.git diff --git a/scripts/console b/scripts/console index 8443321e1..50febadb6 100755 --- a/scripts/console +++ b/scripts/console @@ -44,6 +44,7 @@ use DateTime; use SL::Auth; use SL::Form; use SL::Helper::DateTime; +use SL::InstanceConfiguration; use SL::Locale; use SL::LXDebug; use Data::Dumper; @@ -59,11 +60,12 @@ sub lxinit { package main; - $::lxdebug = LXDebug->new(file => $debug_file); - $::locale = Locale->new($::lx_office_conf{system}->{language}); - $::cgi = CGI->new qw(); - $::form = Form->new; - $::auth = SL::Auth->new; + $::lxdebug = LXDebug->new(file => $debug_file); + $::locale = Locale->new($::lx_office_conf{system}->{language}); + $::form = Form->new; + $::auth = SL::Auth->new; + $::instance_conf = SL::InstanceConfiguration->new; + $::request = { cgi => CGI->new({}) }; die 'cannot reach auth db' unless $::auth->session_tables_present; @@ -77,6 +79,7 @@ sub lxinit { die "cannot find locale for user $login" unless $::locale = Locale->new($::myconfig{countrycode}); + $::instance_conf->init; return "logged in as $login"; }