X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=dispatcher.fpl;h=7d2dfb5be9f4bfce7adb8870c0453c46a030e5af;hb=9487d90b92eaf3bd9b021668f3d4402d4d755266;hp=a4083c115a5aec5eebd08917f904ddc754cba4c3;hpb=94899fc98c0683b7f3fda6e4b9e0abc7d3923a92;p=kivitendo-erp.git diff --git a/dispatcher.fpl b/dispatcher.fpl index a4083c115..7d2dfb5be 100755 --- a/dispatcher.fpl +++ b/dispatcher.fpl @@ -2,17 +2,16 @@ use strict; -BEGIN { - unshift @INC, "modules/override"; # Use our own versions of various modules (e.g. YAML). - push @INC, "modules/fallback"; # Only use our own versions of modules if there's no system version. - push @INC, "SL"; # FCGI won't find modules that are not properly named. Help it by inclduging SL -} - use FCGI; use SL::Dispatcher; +use SL::FCGIFixes; + +our $dispatcher = SL::Dispatcher->new('FastCGI'); +$dispatcher->pre_startup_setup; +SL::FCGIFixes::apply_fixes(); +$dispatcher->pre_startup_checks; -SL::Dispatcher::pre_startup(); my $request = FCGI::Request(); -SL::Dispatcher::handle_request('FastCGI') while $request->Accept() >= 0; +$dispatcher->handle_request($request) while $request->Accept() >= 0; 1;