From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 5 Mar 2008 13:44:44 +0000 (+0000)
Subject: Kosmetik.
X-Git-Tag: release-2.6.0beta1~199
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=a295ff26c39f57d4b36a4115309e5a68b08fbee2;p=kivitendo-erp.git

Kosmetik.
---

diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl
index 4d40e0bc7..656089fd9 100644
--- a/bin/mozilla/oe.pl
+++ b/bin/mozilla/oe.pl
@@ -1798,6 +1798,8 @@ sub purchase_order {
 sub sales_order {
   $lxdebug->enter_sub();
 
+  $form->{"Watchdog::currency"} = 1;
+
   check_oe_access();
   $auth->assert('sales_order_edit');
 
@@ -1830,20 +1832,16 @@ sub poso {
   $form->{transdate} = $form->current_date(\%myconfig);
   delete $form->{duedate};
 
-  $form->{closed} = 0;
+  $form->{closed}          = 0;
 
   $form->{old_employee_id} = $form->{employee_id};
   $form->{old_salesman_id} = $form->{salesman_id};
 
   # reset
-  map { delete $form->{$_} }
-    qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal);
+  map { delete $form->{$_} } qw(id subject message cc bcc printed emailed queued customer vendor creditlimit creditremaining discount tradediscount oldinvtotal);
 
   for $i (1 .. $form->{rowcount}) {
-    map({ $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig,
-                                                     $form->{"${_}_${i}"})
-            if ($form->{"${_}_${i}"}) }
-        qw(ship qty sellprice listprice basefactor));
+    map { $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"}) if ($form->{"${_}_${i}"}) } qw(ship qty sellprice listprice basefactor);
   }
 
   &order_links;
@@ -1852,8 +1850,7 @@ sub poso {
 
   # format amounts
   for $i (1 .. $form->{rowcount} - 1) {
-    map { $form->{"${_}_$i"} =~ s/\"/&quot;/g }
-      qw(partnumber description unit);
+    map { $form->{"${_}_$i"} =~ s/\"/&quot;/g } qw(partnumber description unit);
   }
 
   &update;