From: Moritz Bunkus Date: Fri, 5 Feb 2010 15:38:05 +0000 (+0100) Subject: Bestimmte globale Variablen pro Request initialisieren. X-Git-Tag: release-2.6.2beta1~283 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=aabb3a63106b2c86bfc7c79089bbcf5fd52e72a1;p=kivitendo-erp.git Bestimmte globale Variablen pro Request initialisieren. --- diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm index fb88af58e..dc7f68f2d 100644 --- a/SL/Dispatcher.pm +++ b/SL/Dispatcher.pm @@ -67,15 +67,14 @@ sub pre_startup_setup { # 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 = (); } } @@ -127,9 +126,10 @@ sub handle_request { $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;