X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fgl.pl;h=a6649146eac3e8f910a4a922162ace7199aac018;hb=787248feb4b2ea860d35574f35c2c020070bd407;hp=128113eaf8dece0912d820780768a383f793ce85;hpb=4b48d335511464f7a37b92e6d5c0cbed616fe48d;p=kivitendo-erp.git diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index 128113eaf..a6649146e 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -793,10 +793,10 @@ sub display_rows { my %charts = (); my $taxchart_init; foreach my $item (@{ $form->{ALL_CHARTS} }) { - my $key = Q($item->{accno}) . "--" . Q($item->{tax_id}); + my $key = $item->{accno} . "--" . $item->{tax_id}; $taxchart_init = $item->{taxkey_id} unless (@chart_values); push(@chart_values, $key); - $chart_labels{$key} = H($item->{accno}) . "--" . H($item->{description}); + $chart_labels{$key} = $item->{accno} . "--" . $item->{description}; $charts{$item->{accno}} = $item; } @@ -804,11 +804,10 @@ sub display_rows { my @taxchart_values = (); my %taxcharts = (); foreach my $item (@{ $form->{ALL_TAXCHARTS} }) { - my $key = Q($item->{id}) . "--" . Q($item->{rate}); + my $key = $item->{id} . "--" . $item->{rate}; $taxchart_init = $key if ($taxchart_init eq $item->{taxkey}); push(@taxchart_values, $key); - $taxchart_labels{$key} = H($item->{taxdescription}) . " " . - H($item->{rate} * 100) . ' %'; + $taxchart_labels{$key} = $item->{taxdescription} . " " . $item->{rate} * 100 . ' %'; $taxcharts{$item->{id}} = $item; }