@@ -, +, @@ => OK => OK 'America/Los_Angeles' ); => KO (~20sec on my laptop) --- C4/Letters.pm | 1 + 1 file changed, 1 insertion(+) --- a/C4/Letters.pm +++ a/C4/Letters.pm @@ -654,6 +654,7 @@ sub _parseletter { my $replacedby = defined ($val) ? $val : ''; if ( $replacedby and not $replacedby =~ m|0000-00-00| + and not $replacedby =~ m|9999-31-12| and $replacedby =~ m|^\d{4}-\d{2}-\d{2}( \d{2}:\d{2}:\d{2})?$| ) { # If the value is XXXX-YY-ZZ[ AA:BB:CC] we assume it is a date --