From 595799f4a2b96153522fe307a4f6aad4fb257806 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 3 Jan 2011 17:10:08 +0100
Subject: [PATCH] =?utf8?q?Nach=20Buchen=20von=20Dialog-/Debitoren-/Kredito?=
 =?utf8?q?renbuchungen=20Entw=C3=BCrfe=20nicht=20anzeigen?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Idee ist, mehrere Belege nacheinander möglichst schnell buchen zu
können. Der Zugriff vom Menü aus führt hingegen weiterhin zur Anzeige
der gespeicherten Entwürfe.

Fix für Bug 1528.
---
 bin/mozilla/ap.pl | 2 +-
 bin/mozilla/ar.pl | 8 ++++----
 bin/mozilla/gl.pl | 2 +-
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl
index 35fef992e..74285e73e 100644
--- a/bin/mozilla/ap.pl
+++ b/bin/mozilla/ap.pl
@@ -92,7 +92,7 @@ sub add {
 
   $form->{title} = "Add";
 
-  $form->{callback} = "ap.pl?action=add" unless $form->{callback};
+  $form->{callback} = "ap.pl?action=add&DONT_LOAD_DRAFT=1" unless $form->{callback};
 
   AP->get_transdate(\%myconfig, $form);
   $form->{initial_transdate} = $form->{transdate};
diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl
index 251c4644c..0e5ab85a9 100644
--- a/bin/mozilla/ar.pl
+++ b/bin/mozilla/ar.pl
@@ -95,7 +95,7 @@ sub add {
   # /saving the history
 
   $form->{title}    = "Add";
-  $form->{callback} = "ar.pl?action=add" unless $form->{callback};
+  $form->{callback} = "ar.pl?action=add&DONT_LOAD_DRAFT=1" unless $form->{callback};
 
   AR->get_transdate(\%myconfig, $form);
   $form->{initial_transdate} = $form->{transdate};
@@ -983,12 +983,12 @@ sub update {
   $form->{invdate} = $form->{transdate};
 
   my %saved_variables = map +( $_ => $form->{$_} ), qw(AR AR_amount_1 taxchart_1 oldcustomer);
- 
+
   &check_name("customer");
-     
+
   # check_name ruft get_customer auf, oldcustomer wird überschrieben, daher wird dies vorher gemerkt
   # get_customer holt Bemerkungen als intnotes, für Debitorenbuchungen gibt es aber nur das Feld notes
-  $form->{notes} = $form->{intnotes} if $saved_variables{oldcustomer} ne $form->{customer}; 
+  $form->{notes} = $form->{intnotes} if $saved_variables{oldcustomer} ne $form->{customer};
 
   $form->{AR} = $saved_variables{AR};
   if ($saved_variables{AR_amount_1} =~ m/.--./) {
diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl
index 5417918fd..518e43052 100644
--- a/bin/mozilla/gl.pl
+++ b/bin/mozilla/gl.pl
@@ -1610,7 +1610,7 @@ sub post {
 
   remove_draft() if $form->{remove_draft};
 
-  $form->{callback} = build_std_url("action=add", "show_details");
+  $form->{callback} = build_std_url("action=add&DONT_LOAD_DRAFT=1", "show_details");
   $form->redirect($form->{callback});
 
   $main::lxdebug->leave_sub();
-- 
2.20.1