From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 7 May 2012 16:42:16 +0000 (+0200)
Subject: print_form optional ohne redirect
X-Git-Tag: release-3.2.0beta~411^2~38
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=663a36435a60b53b894ab688f99c54d587d71795;p=kivitendo-erp.git

print_form optional ohne redirect
---

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 1cfc0ca57..7fc1ef1b8 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1232,7 +1232,7 @@ sub print_form {
   $form->error($::locale->text('No print templates have been created for this client yet. Please do so in the client configuration.')) if !$defaults->templates;
   $form->{templates} = $defaults->templates;
 
-  my ($old_form) = @_;
+  my ($old_form, %params) = @_;
 
   my $inv       = "inv";
   my $due       = "due";
@@ -1662,7 +1662,10 @@ sub print_form {
       ($form->{media} eq 'printer')
       ? $locale->text('sent to printer')
       : $locale->text('emailed to') . " $form->{email}";
-    $form->redirect(qq|$form->{label} $form->{"${inv}number"} $msg|);
+
+    if (!$params{no_redirect}) {
+      $form->redirect(qq|$form->{label} $form->{"${inv}number"} $msg|);
+    }
   }
   if ($form->{printing}) {
    call_sub($display_form);