View | Details | Raw Unified | Return to bug 13226
Collapse All | Expand All

(-)a/C4/Letters.pm (-1 / +1 lines)
Lines 654-659 sub _parseletter { Link Here
654
        my $replacedby   = defined ($val) ? $val : '';
654
        my $replacedby   = defined ($val) ? $val : '';
655
        if (    $replacedby
655
        if (    $replacedby
656
            and not $replacedby =~ m|0000-00-00|
656
            and not $replacedby =~ m|0000-00-00|
657
            and not $replacedby =~ m|9999-12-31|
657
            and $replacedby =~ m|^\d{4}-\d{2}-\d{2}( \d{2}:\d{2}:\d{2})?$| )
658
            and $replacedby =~ m|^\d{4}-\d{2}-\d{2}( \d{2}:\d{2}:\d{2})?$| )
658
        {
659
        {
659
            # If the value is XXXX-YY-ZZ[ AA:BB:CC] we assume it is a date
660
            # If the value is XXXX-YY-ZZ[ AA:BB:CC] we assume it is a date
660
- 

Return to bug 13226