X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDispatcher.pm;h=da7ffef641b405dbfa2d1f35c7d98f5474027959;hb=e86ae696818bec729a175a20af13d4ea08745ac2;hp=e6aa5477487b6015dcfc89a979a20ead4b7909b8;hpb=23f79a876613fabf7f4aa2de230788ebeb840de9;p=kivitendo-erp.git

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index e6aa54774..da7ffef64 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -9,11 +9,13 @@ BEGIN {
 }
 
 use CGI qw( -no_xhtml);
+use DateTime;
 use English qw(-no_match_vars);
 use SL::Auth;
 use SL::LXDebug;
 use SL::Locale;
 use SL::Common;
+use SL::Helper::DateTime;
 use Form;
 use List::Util qw(first);
 use File::Basename;
@@ -147,7 +149,8 @@ sub _run_controller {
 }
 
 sub handle_request {
-  my $self = shift;
+  my $self         = shift;
+  $self->{request} = shift;
 
   $::lxdebug->enter_sub;
   $::lxdebug->begin_request;
@@ -306,6 +309,12 @@ sub _route_controller_request {
   return ($controller, $action);
 }
 
+sub get_standard_filehandles {
+  my $self = shift;
+
+  return $self->{interface} =~ m/f(?:ast)cgi/i ? $self->{request}->GetHandles() : (\*STDIN, \*STDOUT, \*STDERR);
+}
+
 package main;
 
 use strict;