Merge branch 'master' into after-262

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index d1fdc830803757fcc4964213bcd3187a600f6648..0637e6ebb4d92b063d8333f0579c626f4e764acb 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1359,6 +1359,7 @@ sub parse_template {
       my $numbytes = (-s $self->{tmpfile});
       open(IN, $self->{tmpfile})
         or $self->error($self->cleanup . "$self->{tmpfile} : $!");
+      binmode IN;
 
       $self->{copies} = 1 unless $self->{media} eq 'printer';