From a386ea48944a5fff408862f5c6622ddfd5cde736 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= <bernd@kivitendo-premium.de>
Date: Mon, 22 Mar 2021 12:45:59 +0100
Subject: [PATCH] =?utf8?q?Mahnungen:=20PDF=20an=20Drucker=20schicken:=20Dr?=
 =?utf8?q?uckbefehl=20erst=20pr=C3=BCfen,=20dann=20verwenden?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 SL/DN.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SL/DN.pm b/SL/DN.pm
index e9aa1ecf2..a4eb12769 100644
--- a/SL/DN.pm
+++ b/SL/DN.pm
@@ -849,10 +849,10 @@ sub melt_pdfs {
       $out = IO::File->new("| $form->{printer_command}");
     }
 
-    $::locale->with_raw_io($out, sub { $out->print($_) while <$in> });
-
     $form->error($main::locale->text('Could not spawn the printer command.')) unless $out;
 
+    $::locale->with_raw_io($out, sub { $out->print($_) while <$in> });
+
   } else {
     my $dunning_filename = $form->get_formname_translation('dunning');
     print qq|Content-Type: Application/PDF\n| .
-- 
2.20.1