From f1bc7f4094bc2c88d53197f1b914b14c5eed1a7c Mon Sep 17 00:00:00 2001 From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Demians?= Date: Fri, 8 Jan 2010 23:04:14 +0100 Subject: [PATCH] overdue_notices.pl various bugs in HEAD 3.2 Those bugs must have been introduced by merge? - Overdue to all libraries with overdue rules doesn't work - Overdue to a specific library doesn't work also --- misc/cronjobs/overdue_notices.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl index 94a1fcd4e3..0923efc8b2 100755 --- a/misc/cronjobs/overdue_notices.pl +++ b/misc/cronjobs/overdue_notices.pl @@ -290,7 +290,7 @@ if (@branchcodes) { @branches = grep { $seen{$_} } @overduebranches; - if (@branches) { + if (@overduebranches) { my $branch_word = scalar @branches > 1 ? 'branches' : 'branch'; $verbose and warn "$branch_word @branches have overdue rules\n"; @@ -327,6 +327,7 @@ if ( defined $csvfilename ) { } } +@branches = @overduebranches unless @branches; foreach my $branchcode (@branches) { my $branch_details = C4::Branch::GetBranchDetail($branchcode); -- 2.39.2