From: Stephan Köhler <s.koehler@linet-services.de>
Date: Thu, 24 Nov 2005 16:18:05 +0000 (+0000)
Subject: Merge von 578 aus unstable: Fixed Bug #198
X-Git-Tag: release-2.2.0~109
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/5d9313c22b1ff61a4ed3584908561bb95c0393e3?ds=sidebyside

Merge von 578 aus unstable: Fixed Bug #198
---

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 9d7597120..d0e813f57 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1552,9 +1552,10 @@ sub ship_to {
 
   map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) }
     qw(exchangerate creditlimit creditremaining);
-
+  $form_id = $form->{id};
   # get details for name
   &{"$form->{vc}_details"};
+  $form->{id} = $form_id;
 
   $number =
     ($form->{vc} eq 'customer')