X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fir.pl;h=9f40930e8ed7255f2585fe0102d8b7fcc2f4868b;hb=01a6bf1b55f003fb6f15a70acf51d3e921af7244;hp=faaa3cc6461a07fc9ba66d0a35f2f28ce6094e71;hpb=ee9fb352c2d675dfe828e5f672d857b827e003ed;p=kivitendo-erp.git diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index faaa3cc64..9f40930e8 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -301,9 +301,10 @@ sub form_header { %labels = (); @values = (); + my $i = 0; foreach my $item (@{ $form->{"ALL_CURRENCIES"} }) { - push(@values, $item->{"currency"}); - $labels{$item->{"currency"}} = $item->{"currency"}; + push(@values, $item); + $labels{$item} = $item; } $form->{currency} = $form->{defaultcurrency} unless $form->{currency};