From: Sven Schöling <s.schoeling@linet-services.de>
Date: Tue, 23 Feb 2010 11:26:51 +0000 (+0100)
Subject: warnings gefixt, und globals besser dokumentiert.
X-Git-Tag: release-2.6.2beta1~274
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=1c8bbb4e4a123cbdb62106ba96378ef6a849713c;p=kivitendo-erp.git

warnings gefixt, und globals besser dokumentiert.
---

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index b4f75ba1b..620857459 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -64,17 +64,19 @@ sub pre_startup_setup {
     require "bin/mozilla/installationcheck.pl";
   } or die $EVAL_ERROR;
 
-  # dummy globals
+  # canonial globals. if it's not here, chances are it will get refactored someday.
   {
     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   = ();
+    $::userspath   = "users";
+    $::templates   = "templates";
+    $::memberfile  = "users/members";
+    $::menufile    = "menu.ini";
+    $::sendmail    = "| /usr/sbin/sendmail -t";
+    $::lxdebug     = LXDebug->new;
+    $::auth        = SL::Auth->new;
+    $::form        = undef;
+    %::myconfig    = ();
+    %::called_subs = (); # currently used for recursion detection
   }
 }