From 27e91abd3d3b8034b5f8b0fe27752f6dc17b720a Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 5 Mar 2008 13:58:38 +0000
Subject: [PATCH] =?utf8?q?Bei=20der=20Umwandlung=20in=20Auftr=C3=A4ge=20di?=
 =?utf8?q?e=20ausgew=C3=A4hlte=20W=C3=A4hrung=20beibehalten.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 bin/mozilla/oe.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index c388cddba..9c3b2fd40 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -1842,8 +1842,12 @@ sub poso {
     map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor);
   }
 
+  my %saved_vars = map { $_ => $form->{$_} } grep { $form->{$_} } qw(currency);
+
   &order_links;
 
+  map { $form->{$_} = $saved_vars{$_} } keys %saved_vars;
+
   &prepare_order;
 
   # format amounts
-- 
2.20.1