X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/27e80751043612bbb6d75b36d8dcd6b6eb7d6b9e..08c751991a135cdc1e582b51b72c6f54d0818c3a:/scripts/console diff --git a/scripts/console b/scripts/console index d567c5640..50febadb6 100755 --- a/scripts/console +++ b/scripts/console @@ -62,10 +62,10 @@ sub lxinit { $::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; $::instance_conf = SL::InstanceConfiguration->new; + $::request = { cgi => CGI->new({}) }; die 'cannot reach auth db' unless $::auth->session_tables_present;