X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0c74481badeb32ab90aac15d047551f024ffae27..add203540132a10018346c0765dd437cf4ee8371:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 8532c656f..81d6dc41b 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1323,6 +1323,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';