X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=dispatcher.fpl;h=9b7c98b7d1302088ed1f4ea6f35a9fdf88ee477f;hb=51eca07c805710334a326a2eac6df7ba5bdc8aec;hp=7d2dfb5be9f4bfce7adb8870c0453c46a030e5af;hpb=87ad1737166b8eb5ec26ec3ab27f686bdf4d3679;p=kivitendo-erp.git diff --git a/dispatcher.fpl b/dispatcher.fpl index 7d2dfb5be..9b7c98b7d 100755 --- a/dispatcher.fpl +++ b/dispatcher.fpl @@ -2,16 +2,22 @@ use strict; -use FCGI; +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; use SL::FCGIFixes; +use SL::LXDebug; our $dispatcher = SL::Dispatcher->new('FastCGI'); $dispatcher->pre_startup_setup; SL::FCGIFixes::apply_fixes(); $dispatcher->pre_startup_checks; - -my $request = FCGI::Request(); -$dispatcher->handle_request($request) while $request->Accept() >= 0; +$dispatcher->handle_all_requests; 1;