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

(-)a/misc/cronjobs/advance_notices.pl (-7 / +6 lines)
Lines 266-272 UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { Link Here
266
                                      message_transport_type => $transport,
266
                                      message_transport_type => $transport,
267
                                    } )
267
                                    } )
268
                    or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
268
                    or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
269
                push @letters, $letter;
269
                push @letters, $letter if $letter;
270
            }
270
            }
271
        }
271
        }
272
    } else {
272
    } else {
Lines 302-308 UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { Link Here
302
                                      message_transport_type => $transport,
302
                                      message_transport_type => $transport,
303
                                    } )
303
                                    } )
304
                    or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
304
                    or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
305
                push @letters, $letter;
305
                push @letters, $letter if $letter;
306
            }
306
            }
307
        }
307
        }
308
    }
308
    }
Lines 376-383 PATRON: while ( my ( $borrowernumber, $digest ) = each %$upcoming_digest ) { Link Here
376
                message_transport_type => $transport,
376
                message_transport_type => $transport,
377
            }
377
            }
378
          )
378
          )
379
          or die "no letter of type '$letter_type' found. Please see sample_notices.sql";
379
          or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
380
        push @letters, $letter;
380
        push @letters, $letter if $letter;
381
    }
381
    }
382
382
383
    if ( @letters ) {
383
    if ( @letters ) {
Lines 434-441 PATRON: while ( my ( $borrowernumber, $digest ) = each %$due_digest ) { Link Here
434
                message_transport_type => $transport,
434
                message_transport_type => $transport,
435
            }
435
            }
436
          )
436
          )
437
          or die "no letter of type '$letter_type' found. Please see sample_notices.sql";
437
          or warn "no letter of type '$letter_type' found. Please see sample_notices.sql";
438
        push @letters, $letter;
438
        push @letters, $letter if $letter;
439
    }
439
    }
440
440
441
    if ( @letters ) {
441
    if ( @letters ) {
442
- 

Return to bug 12922