X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fap.pl;h=442531a7f262a71ee83571476a4d06ab12d1cc0f;hb=c62ddafe32128a30ea9247568858d344ed6d5655;hp=f01290744765f07422b3141baf6e7420ad74cd3d;hpb=a78733394b047be525d30135378f925e10a91c30;p=kivitendo-erp.git diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index f01290744..442531a7f 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -129,7 +129,7 @@ sub create_links { $form->{selecttaxchart} = $tax; # currencies - @curr = split /:/, $form->{currencies}; + @curr = split(/:/, $form->{currencies}); chomp $curr[0]; $form->{defaultcurrency} = $curr[0]; @@ -538,20 +538,23 @@ $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=\"$form->{"AP_amount_$i"}\" selected/; $tax = $taxchart; $tax_selected = $form->{"taxchart_$i"}; $tax =~ s/value=\"$tax_selected\"/value=\"$tax_selected\" selected/; $tax = - qq||; + qq||; + + my $korrektur = $form->{"korrektur_$i"} ? 'checked' : ''; print qq| - - {"amount_$i"}> + + {"amount_$i"}> {"tax_$i"}> - + $tax {"project_id_$i"}>