kivitendo/dispatcher.pl @ 4cb374f9
b01d84a9 | Sven Schöling | #!/usr/bin/perl
|
||
use strict;
|
||||
cff913a1 | Moritz Bunkus | 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.
|
||||
}
|
||||
b01d84a9 | Sven Schöling | use SL::Dispatcher;
|
||
our $dispatcher = SL::Dispatcher->new('CGI');
|
||||
$dispatcher->pre_startup;
|
||||
$dispatcher->handle_request;
|
||||
1;
|