Revision c13acbec
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| SL/Dispatcher.pm | ||
|---|---|---|
| 95 | 95 |
$::auth = SL::Auth->new; |
| 96 | 96 |
$::form = undef; |
| 97 | 97 |
%::myconfig = (); |
| 98 |
%::called_subs = (); # currently used for recursion detection |
|
| 99 | 98 |
} |
| 100 | 99 |
|
| 101 | 100 |
$SIG{__WARN__} = sub {
|
| ... | ... | |
| 171 | 170 |
$::cgi = CGI->new('');
|
| 172 | 171 |
$::locale = Locale->new($::lx_office_conf{system}->{language});
|
| 173 | 172 |
$::form = Form->new; |
| 174 |
%::called_subs = (); |
|
| 175 | 173 |
$::instance_conf = SL::InstanceConfiguration->new; |
| 176 | 174 |
|
| 177 | 175 |
my $session_result = $::auth->restore_session; |
Auch abrufbar als: Unified diff
::called_subs ersatzlos gestrichen.
call_sub Rekursionen sind nicht mehr aufgetreten seit das System eingebaut
wurde, kein Grund auf Verdacht darauf zu prüfen.