X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=dispatcher.pl;h=e5621f6f5cb0f2d69fad5d743dbdf283979dbb99;hb=94ebf17421d5c36082909c1b01c7a6b8b1540493;hp=603d166b2ca7a63d4c7f36408ee3ca41741e849e;hpb=f9676efea9ccfa01df2a57dca9c45cc8fde0d09e;p=kivitendo-erp.git

diff --git a/dispatcher.pl b/dispatcher.pl
index 603d166b2..e5621f6f5 100755
--- a/dispatcher.pl
+++ b/dispatcher.pl
@@ -2,9 +2,18 @@
 
 use strict;
 
+BEGIN {
+  use FindBin;
+
+  unshift(@INC, $FindBin::Bin . '/modules/override'); # Use our own versions of various modules (e.g. YAML).
+  push   (@INC, $FindBin::Bin);                       # '.' will be removed from @INC soon.
+  push   (@INC, $FindBin::Bin . '/modules/fallback'); # Only use our own versions of modules if there's no system version.
+}
+
 use SL::Dispatcher;
 
-SL::Dispatcher::pre_startup();
-SL::Dispatcher::handle_request('CGI');
+our $dispatcher = SL::Dispatcher->new('CGI');
+$dispatcher->pre_startup;
+$dispatcher->handle_request;
 
 1;