Revision aabb3a63
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
| SL/Dispatcher.pm | ||
|---|---|---|
|
# dummy globals
|
||
|
{
|
||
|
no warnings 'once';
|
||
|
$::userspath = "users";
|
||
|
$::templates = "templates";
|
||
|
$::memberfile = "users/members";
|
||
|
$::menufile = "menu.ini";
|
||
|
$::sendmail = "| /usr/sbin/sendmail -t";
|
||
|
$::lxdebug = LXDebug->new;
|
||
|
$::auth = SL::Auth->new;
|
||
|
%::myconfig = ();
|
||
|
%::called_subs = ();
|
||
|
$::userspath = "users";
|
||
|
$::templates = "templates";
|
||
|
$::memberfile = "users/members";
|
||
|
$::menufile = "menu.ini";
|
||
|
$::sendmail = "| /usr/sbin/sendmail -t";
|
||
|
$::lxdebug = LXDebug->new;
|
||
|
$::auth = SL::Auth->new;
|
||
|
%::myconfig = ();
|
||
|
}
|
||
|
}
|
||
|
|
||
| ... | ... | |
|
$script_name = $0;
|
||
|
}
|
||
|
|
||
|
$::cgi = CGI->new('');
|
||
|
$::locale = Locale->new($::language);
|
||
|
$::form = Form->new;
|
||
|
$::cgi = CGI->new('');
|
||
|
$::locale = Locale->new($::language);
|
||
|
$::form = Form->new;
|
||
|
%::called_subs = ();
|
||
|
|
||
|
eval { ($script_name, $action) = _route_request($script_name); 1; } or return;
|
||
|
|
||
Auch abrufbar als: Unified diff
Bestimmte globale Variablen pro Request initialisieren.