From 81c95198cd68f935e06378e3b9ff14a3e84b85e0 Mon Sep 17 00:00:00 2001
From: Bernd Blessmann <bibi@online.de>
Date: Tue, 10 Jan 2012 13:12:38 +0100
Subject: [PATCH] Nachtrag zu commit 2879330bd173831981bdd8b25fc1900292efaeac
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Währung soll Workflow über Lieferschein überleben.
---
 bin/mozilla/do.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl
index 2079533a1..9e709356f 100644
--- a/bin/mozilla/do.pl
+++ b/bin/mozilla/do.pl
@@ -174,7 +174,7 @@ sub order_links {
   DO->retrieve('vc'  => $form->{vc},
                'ids' => $form->{id});
 
-  $form->backup_vars(qw(payment_id language_id taxzone_id salesman_id taxincluded cp_id intnotes));
+  $form->backup_vars(qw(payment_id language_id taxzone_id salesman_id taxincluded cp_id intnotes currency));
   $form->{shipto} = 1 if $form->{id};
 
   # get customer / vendor
@@ -187,6 +187,7 @@ sub order_links {
   }
 
   $form->restore_vars(qw(payment_id language_id taxzone_id intnotes cp_id));
+  $form->restore_vars(qw(currency)) if ($form->{id} || $form->{convert_from_oe_ids});
   $form->restore_vars(qw(taxincluded)) if $form->{id};
   $form->restore_vars(qw(salesman_id)) if $editing;
 
-- 
2.20.1