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

(-)a/misc/cronjobs/overdue_notices.pl (-1 / +3 lines)
Lines 644-649 sub parse_letter { # FIXME: this code should probably be moved to C4::Letters:pa Link Here
644
        return unless exists $params->{$required};
644
        return unless exists $params->{$required};
645
    }
645
    }
646
646
647
   my $todaysdate = C4::Dates->new()->output("syspref");
648
   $params->{'letter'}->{title}   =~ s/<<today>>/$todaysdate/g;
649
   $params->{'letter'}->{content} =~ s/<<today>>/$todaysdate/g;
647
650
648
    if ( $params->{'substitute'} ) {
651
    if ( $params->{'substitute'} ) {
649
        while ( my ( $key, $replacedby ) = each %{ $params->{'substitute'} } ) {
652
        while ( my ( $key, $replacedby ) = each %{ $params->{'substitute'} } ) {
650
- 

Return to bug 5197