From: Stephan Köhler <s.koehler@linet-services.de>
Date: Thu, 23 Feb 2006 13:45:49 +0000 (+0000)
Subject: Bugfix 300 falsches Quoten in Kreditorenbuchungen - Dank an Moritz
X-Git-Tag: release-2.4.0^2~318
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=54b65b2f2bd1ceaef79587556d2405a1051fd8b0;p=kivitendo-erp.git

Bugfix 300 falsches Quoten in Kreditorenbuchungen - Dank an Moritz
---

diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl
index fd86583dd..9fa038fd4 100644
--- a/bin/mozilla/ap.pl
+++ b/bin/mozilla/ap.pl
@@ -538,8 +538,9 @@ $jsscript
       $form->format_amount(\%myconfig, $form->{"amount_$i"}, 2);
     $form->{"tax_$i"} = $form->format_amount(\%myconfig, $form->{"tax_$i"}, 2);
     $selectAP_amount = $selectAP_amount_unquoted;
+    $re_amount = quotemeta($form->{"AP_amount_$i"});
     $selectAP_amount =~
-      s/option value=\"$form->{"AP_amount_$i"}\"/option value=\"$form->{"AP_amount_$i"}\" selected/;
+      s/option value=\"${re_amount}\"/option value=\"${re_amount}\" selected/;
     $tax          = $taxchart;
     $tax_selected = $form->{"taxchart_$i"};
     $tax =~ s/value=\"$tax_selected\"/value=\"$tax_selected\" selected/;