Revision ed7bfc4a
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/Dispatcher.pm | ||
|---|---|---|
| 75 | 75 |
require "config/lx-erp-local.conf"; |
| 76 | 76 |
} if -f "config/lx-erp-local.conf"; |
| 77 | 77 |
|
| 78 |
read_config 'config/lx_office.conf' => %::lx_office_conf; |
|
| 79 |
_decode_recursively(\%::lx_office_conf); |
|
| 80 |
|
|
| 78 | 81 |
eval {
|
| 79 | 82 |
package main; |
| 80 | 83 |
require "bin/mozilla/common.pl"; |
| ... | ... | |
| 94 | 97 |
$::form = undef; |
| 95 | 98 |
%::myconfig = (); |
| 96 | 99 |
%::called_subs = (); # currently used for recursion detection |
| 97 |
|
|
| 98 |
read_config 'config/lx_office.conf' => %::lx_office_conf if -f "config/lx_office.conf"; |
|
| 99 |
_decode_recursively(\%::lx_office_conf); |
|
| 100 | 100 |
} |
| 101 | 101 |
|
| 102 | 102 |
$SIG{__WARN__} = sub {
|
| scripts/console | ||
|---|---|---|
| 68 | 68 |
eval { require "config/lx-erp.conf"; };
|
| 69 | 69 |
eval { require "config/lx-erp-local.conf"; } if -f "config/lx-erp-local.conf";
|
| 70 | 70 |
|
| 71 |
read_config 'config/lx_office.conf' => %::lx_office_conf; |
|
| 72 |
SL::Dispatcher::_decode_recursively(\%::lx_office_conf); |
|
| 73 |
|
|
| 71 | 74 |
$::lxdebug = LXDebug->new; |
| 72 | 75 |
$::locale = Locale->new($::language); |
| 73 | 76 |
$::cgi = CGI->new qw(); |
| 74 | 77 |
$::form = Form->new; |
| 75 | 78 |
$::auth = SL::Auth->new; |
| 76 | 79 |
|
| 77 |
read_config 'config/lx_office.conf' => %::lx_office_conf; |
|
| 78 |
SL::Dispatcher::_decode_recursively(\%::lx_office_conf); |
|
| 79 |
|
|
| 80 | 80 |
die 'cannot reach auth db' unless $::auth->session_tables_present; |
| 81 | 81 |
|
| 82 | 82 |
$::auth->restore_session; |
Auch abrufbar als: Unified diff
Globales Konfigurationsobjekt %::lx_office_conf möglichst früh anlegen