X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f3288b9cb4e09eac31d5a80f22063606e9a7b75d..ed7bfc4a981d759e51e19a5fe639983554fc8fc9:/scripts/console diff --git a/scripts/console b/scripts/console index 42c193ac1..4d89fdb57 100755 --- a/scripts/console +++ b/scripts/console @@ -14,7 +14,7 @@ use Data::Dumper; use Devel::REPL 1.002001; use Term::ReadLine::Perl::Bind; # use sane key binding for rxvt users -read_config 'config/console.conf' => my %config;# if -f 'config/console.conf'; +read_config 'config/lx_office.conf' => my %config; my $login = shift || $config{Console}{login} || 'demo'; my $history_file = $config{Console}{history_file} || '/tmp/lxoffice_console_history.log'; # fallback if users is not writable @@ -41,6 +41,7 @@ use utf8; use CGI qw( -no_xhtml); use DateTime; use SL::Auth; +use SL::Dispatcher; use SL::Form; use SL::Helper::DateTime; use SL::Locale; @@ -67,6 +68,9 @@ sub lxinit { eval { require "config/lx-erp.conf"; }; eval { require "config/lx-erp-local.conf"; } if -f "config/lx-erp-local.conf"; + read_config 'config/lx_office.conf' => %::lx_office_conf; + SL::Dispatcher::_decode_recursively(\%::lx_office_conf); + $::lxdebug = LXDebug->new; $::locale = Locale->new($::language); $::cgi = CGI->new qw(); @@ -193,8 +197,8 @@ of the classes they were created with. Configuration of this script is located in: - config/console.conf - config/console.conf.default + config/lx_office.conf + config/lx_office.conf.default See there for interesting options.