diff options
| -rw-r--r-- | LedgerSMB/Locale.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/LedgerSMB/Locale.pm b/LedgerSMB/Locale.pm index 9f4d2fdb..c6192510 100644 --- a/LedgerSMB/Locale.pm +++ b/LedgerSMB/Locale.pm @@ -67,6 +67,10 @@ sub date { $spc =~ s/\w//g; $spc = substr($spc, 0, 1); + if (!$longformat && $date =~ /^\d{4}\D/){ # reparsing date at this point + # causes problems! + return $date; + } if ($date =~ /\D/) { if ($myconfig->{dateformat} =~ /^yy/) { |