X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8e128c2e9ea95346165c24c741ba5b9d0de44411..2e6ed943d2b78bc2dbfbeb410868e721a0e5740e:/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;