From 7dfa1c0a93585de7736045b5af28bd7dbb600ebc Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Wed, 6 Jun 2007 15:19:58 +0000 Subject: [PATCH] =?utf8?q?Beim=20Verschicken=20von=20Belegen=20per=20Email?= =?utf8?q?=20darf=20das=20Vorlagenk=C3=BCrzel=20eines=20eventuell=20einges?= =?utf8?q?tellten=20Druckers=20nicht=20an=20den=20Dateinamen=20der=20Vorla?= =?utf8?q?ge=20angeh=C3=A4ngt=20werden.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- bin/mozilla/io.pl | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index d5209cf08..6db2c5743 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1693,7 +1693,14 @@ sub print_form { delete $form->{printer_command}; $form->{language} = $form->get_template_language(\%myconfig); - $form->{printer_code} = $form->get_printer_code(\%myconfig); + + my $printer_code; + if ($form->{media} ne 'email') { + $printer_code = $form->get_printer_code(\%myconfig); + if ($printer_code ne "") { + $printer_code = "_" . $printer_code; + } + } if ($form->{language} ne "") { map({ $form->{"unit"}->[$_] = @@ -1739,11 +1746,7 @@ sub print_form { grep({ /^qty_\d+$/ } keys(%{$form}))); - if ($form->{printer_code} ne "") { - $form->{printer_code} = "_" . $form->{printer_code}; - } - - $form->{IN} = "$form->{formname}$form->{language}$form->{printer_code}.html"; + $form->{IN} = "$form->{formname}$form->{language}${printer_code}.html"; if ($form->{format} eq 'postscript') { $form->{postscript} = 1; $form->{IN} =~ s/html$/tex/; -- 2.20.1