Bei Fehler LaTeX Tempfiles als UTF8 einlesen
authorG. Richardson <information@kivitendo-premium.de>
Mon, 3 Nov 2014 11:52:23 +0000 (12:52 +0100)
committerG. Richardson <information@kivitendo-premium.de>
Tue, 4 Nov 2014 11:10:55 +0000 (12:10 +0100)
Dadurch können Unicode-Zeichen, die in der .tex Datei Fehler
verursachen, dem Benutzer an der Oberfläche besser angezeigt werden.

SL/Form.pm

index a61a6c8..171b5ff 100644 (file)
@@ -1137,7 +1137,7 @@ sub parse_template {
       $full_signature         =~ s/\n/<br>\n/g;
       $mail->{message}       .=  $full_signature;
 
-      open(IN, "<", $self->{tmpfile})
+      open(IN, "<:encoding(UTF-8)", $self->{tmpfile})
         or $self->error($self->cleanup . "$self->{tmpfile} : $!");
       $mail->{message} .= $_ while <IN>;
       close(IN);
@@ -1326,7 +1326,7 @@ sub cleanup {
     push @err, $::locale->text('The application "#1" was not found on the system.', $application || 'pdflatex') . ' ' . $::locale->text('Please contact your administrator.');
 
   } elsif (-f "$self->{tmpfile}.err") {
-    open(FH, "$self->{tmpfile}.err");
+    open(FH, "<:encoding(UTF-8)", "$self->{tmpfile}.err");
     @err = <FH>;
     close(FH);
   }