X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FRequest.pm;h=d4f2d88501b43a99208ea032ae6f8f653c83490c;hb=72be9c763f3b7f7df1fae4fe10011e45f9e2ad1d;hp=57b72979842b29ff7105ebc39f16aab9f321c3fb;hpb=efd3ab012a05e77ab665f48009c2a0f10ade326c;p=kivitendo-erp.git

diff --git a/SL/Request.pm b/SL/Request.pm
index 57b729798..d4f2d8850 100644
--- a/SL/Request.pm
+++ b/SL/Request.pm
@@ -199,9 +199,6 @@ sub read_cgi_input {
   if ($ENV{CONTENT_LENGTH}) {
     my $content;
     read STDIN, $content, $ENV{CONTENT_LENGTH};
-    open my $fh, '>:raw', '/tmp/blubb.bin' or die;
-    print $fh $content;
-    close $fh;
     if ($ENV{'CONTENT_TYPE'} && $ENV{'CONTENT_TYPE'} =~ /multipart\/form-data/) {
       # multipart formdata can bring it's own encoding, so give it both
       # and let ti decide on it's own
@@ -212,18 +209,16 @@ sub read_cgi_input {
     }
   }
 
+  my $encoding     = delete $temp_target->{INPUT_ENCODING} || $db_charset;
+
+  _recode_recursively(SL::Iconv->new($encoding, $db_charset), $temp_target => $target) if keys %$target;
+
   if ($target->{RESTORE_FORM_FROM_SESSION_ID}) {
     my %temp_form;
     $::auth->restore_form_from_session(delete $target->{RESTORE_FORM_FROM_SESSION_ID}, form => \%temp_form);
     _store_value($target, $_, $temp_form{$_}) for keys %temp_form;
   }
 
-  my $encoding     = delete $temp_target->{INPUT_ENCODING} || $db_charset;
-
-  _recode_recursively(SL::Iconv->new($encoding, $db_charset), $temp_target => $target) if keys %$target;
-
-  map { $target->{$_} = $temp_target->{$_} } keys %{ $temp_target };
-
   $::lxdebug->leave_sub;
 
   return $target;