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

(-)a/C4/Letters.pm (-2 / +2 lines)
Lines 824-831 sub _parseletter { Link Here
824
                    $dateonly = $1 unless $dateonly;
824
                    $dateonly = $1 unless $dateonly;
825
                }
825
                }
826
                my $replacedby_date = eval {
826
                my $replacedby_date = eval {
827
                    output_pref({ dt => dt_from_string( $replacedby ), dateonly => $dateonly });
827
                    output_pref({ dt => scalar dt_from_string( $replacedby ), dateonly => $dateonly });
828
                };
828
                };
829
                $replacedby_date //= q{};
829
830
830
                if ( $letter->{ $letter_field } ) {
831
                if ( $letter->{ $letter_field } ) {
831
                    $letter->{ $letter_field } =~ s/\Q<<$table.$field$filter_string_used>>\E/$replacedby_date/g;
832
                    $letter->{ $letter_field } =~ s/\Q<<$table.$field$filter_string_used>>\E/$replacedby_date/g;
832
- 

Return to bug 30638