Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 8740c4bf

Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt

  • ID 8740c4bf6ac83343116fae99eeb50ab785b531c9
  • Vorgänger 032e5fcd
  • Nachfolger ea711360

Doppeltes HTML-Quoting vermeiden (das CGI-Modul quotet selber schon).

Unterschiede anzeigen:

bin/mozilla/gl.pl
793 793
  my %charts = ();
794 794
  my $taxchart_init;
795 795
  foreach my $item (@{ $form->{ALL_CHARTS} }) {
796
    my $key = Q($item->{accno}) . "--" . Q($item->{tax_id});
796
    my $key = $item->{accno} . "--" . $item->{tax_id};
797 797
    $taxchart_init = $item->{taxkey_id} unless (@chart_values);
798 798
    push(@chart_values, $key);
799
    $chart_labels{$key} = H($item->{accno}) . "--" . H($item->{description});
799
    $chart_labels{$key} = $item->{accno} . "--" . $item->{description};
800 800
    $charts{$item->{accno}} = $item;
801 801
  }
802 802

  
......
804 804
  my @taxchart_values = ();
805 805
  my %taxcharts = ();
806 806
  foreach my $item (@{ $form->{ALL_TAXCHARTS} }) {
807
    my $key = Q($item->{id}) . "--" . Q($item->{rate});
807
    my $key = $item->{id} . "--" . $item->{rate};
808 808
    $taxchart_init = $key if ($taxchart_init eq $item->{taxkey});
809 809
    push(@taxchart_values, $key);
810
    $taxchart_labels{$key} = H($item->{taxdescription}) . " " .
811
      H($item->{rate} * 100) . ' %';
810
    $taxchart_labels{$key} = $item->{taxdescription} . " " . $item->{rate} * 100 . ' %';
812 811
    $taxcharts{$item->{id}} = $item;
813 812
  }
814 813

  

Auch abrufbar als: Unified diff