Loeschen von Drafts flexibler.

[mfinanz.git] / bin / mozilla / is.pl

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index d50d6d0f7d4919777edc1295c3f70259dc47df3f..30d0a072f5b7aa54ac10689162b523434af59421 100644 (file)
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -1451,7 +1451,7 @@ sub post {
     if (!(IS->post_invoice(\%myconfig, \%$form))) {
       $form->error($locale->text('Cannot post invoice!'));
     }
-    remove_draft();
+    remove_draft() if $form->{remove_draft};
     # saving the history
        if(!exists $form->{addition}) {
          $form->{addition} = "PRINTED AND POSTED";
@@ -1461,7 +1461,7 @@ sub post {
     
   } else {
     if (IS->post_invoice(\%myconfig, \%$form)){
-      remove_draft();
+      remove_draft() if $form->{remove_draft};
        # saving the history
         if(!exists $form->{addition}) {
                        if($form->{storno}) {