From 04ac36aa7c8529871610bf2594acfc31a3b80db5 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 13 Feb 2014 14:54:45 +0100 Subject: [PATCH] Bug 10832: (follow-up) fix case where some print overdue notices were not being sent If overdues should be sent to some patron (on the same branch), only the first one was notified. This patch fixes this issue. Signed-off-by: Olli-Antti Kivilahti Signed-off-by: Marcel de Rooy Signed-off-by: Galen Charlton --- misc/cronjobs/overdue_notices.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl index 3778a82fce..855558dd4f 100755 --- a/misc/cronjobs/overdue_notices.pl +++ b/misc/cronjobs/overdue_notices.pl @@ -454,8 +454,6 @@ END_SQL # my $outfile = 'overdues_' . ( $mybranch || $branchcode || 'default' ); while ( my $overdue_rules = $rqoverduerules->fetchrow_hashref ) { PERIOD: foreach my $i ( 1 .. 3 ) { - my $print_sent = 0; # We never sent a print notice - $verbose and warn "branch '$branchcode', pass $i\n"; my $mindays = $overdue_rules->{"delay$i"}; # the notice will be sent after mindays days (grace period) my $maxdays = ( @@ -576,6 +574,8 @@ END_SQL @message_transport_types = @{ GetOverdueMessageTransportTypes( q{}, $overdue_rules->{categorycode}, $i) } unless @message_transport_types; + + my $print_sent = 0; # A print notice is not yet sent for this patron for my $mtt ( @message_transport_types ) { my $letter = parse_letter( -- 2.39.5