parse_template: $form->{media} == 'file' bedeutet, nur Druckdatei in $form->{OUT...
authorMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 13 Jan 2011 12:44:55 +0000 (13:44 +0100)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 13 Jan 2011 12:44:55 +0000 (13:44 +0100)
Conflicts:

SL/Form.pm

SL/Form.pm

index e1646e6..db9b503 100644 (file)
@@ -43,6 +43,7 @@ use CGI;
 use CGI::Ajax;
 use Cwd;
 use Encode;
+use File::Copy;
 use IO::File;
 use SL::Auth;
 use SL::Auth::DB;
@@ -1269,6 +1270,16 @@ sub parse_template {
     $self->error("$self->{IN} : " . $template->get_error());
   }
 
+  if ($self->{media} eq 'file') {
+    copy(join('/', $self->{cwd}, $userspath, $self->{tmpfile}), $out =~ m|^/| ? $out : join('/', $self->{cwd}, $out)) if $template->uses_temp_file;
+    $self->cleanup;
+    chdir("$self->{cwd}");
+
+    $::lxdebug->leave_sub();
+
+    return;
+  }
+
   if ($template->uses_temp_file() || $self->{media} eq 'email') {
 
     if ($self->{media} eq 'email') {