X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0fec73d228dd036fd61f99fab05be82767245657..56eb34447cfb6edabc995cd97555c6a70823b422:/bin/mozilla/io.pl diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 690162348..9fdb05825 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1585,9 +1585,17 @@ sub print_form { IS->invoice_details(\%myconfig, \%$form, $locale); } + # format global dates map { $form->{$_} = $locale->date(\%myconfig, $form->{$_}, 1) } ("${inv}date", "${due}date", "shippingdate", "deliverydate"); + # format item dates + for my $field (qw(transdate_oe deliverydate_oe)) { + map { + $form->{$field}[$_] = $locale->date(\%myconfig, $form->{$field}[$_], 1); + } 0..$#{$form->{$field}}; + } + @a = qw(name street zipcode city country); $shipto = 1;