Revision 891411c1
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
SL/Dispatcher.pm | ||
---|---|---|
23 | 23 |
use SL::Common; |
24 | 24 |
use SL::Form; |
25 | 25 |
use SL::Helper::DateTime; |
26 |
use SL::InstanceConfiguration; |
|
26 | 27 |
use SL::Template::Plugin::HTMLFixes; |
27 | 28 |
|
28 | 29 |
# Trailing new line is added so that Perl will not add the line |
... | ... | |
172 | 173 |
$::locale = Locale->new($::lx_office_conf{system}->{language}); |
173 | 174 |
$::form = Form->new; |
174 | 175 |
%::called_subs = (); |
176 |
$::instance_conf = SL::InstanceConfiguration->new; |
|
175 | 177 |
|
176 | 178 |
my $session_result = $::auth->restore_session; |
177 | 179 |
$::auth->create_or_refresh_session; |
... | ... | |
219 | 221 |
delete $::form->{password}; |
220 | 222 |
|
221 | 223 |
if ($action) { |
224 |
$::instance_conf->init; |
|
225 |
|
|
222 | 226 |
map { $::form->{$_} = $::myconfig{$_} } qw(stylesheet charset) |
223 | 227 |
unless $action eq 'save' && $::form->{type} eq 'preferences'; |
224 | 228 |
|
Auch abrufbar als: Unified diff
Eine Klasse & globale Variable zur Verwaltung von mandantenbasierter Konfiguration