X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=scripts%2Fconsole;h=50febadb60d1842bb73aa98bb33ab75012acb0b1;hb=f110df03e304dd4722574a23b823a88fc4fa37d8;hp=78b73055920ed497c607173b0730d8104caf710f;hpb=3d7898cf2bab46c72face3011460d093d8778b32;p=kivitendo-erp.git diff --git a/scripts/console b/scripts/console index 78b730559..50febadb6 100755 --- a/scripts/console +++ b/scripts/console @@ -18,6 +18,7 @@ SL::LxOfficeConf->read; my $login = shift || $::lx_office_conf{console}{login} || 'demo'; my $history_file = $::lx_office_conf{console}{history_file} || '/tmp/lxoffice_console_history.log'; # fallback if users is not writable +my $debug_file = $::lx_office_conf{console}{log_file} || '/tmp/lxoffice_console_debug.log'; my $autorun = $::lx_office_conf{console}{autorun}; # will be configed eventually @@ -43,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; @@ -58,11 +60,12 @@ sub lxinit { package main; - $::lxdebug = LXDebug->new; - $::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; @@ -76,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"; } @@ -131,7 +135,7 @@ __END__ =head1 NAME -scripts/console - Lx Office Console +scripts/console - Lx-Office console =head1 SYNOPSIS