From f3df9c6a4010188b410db9a5d7fdf763551880d2 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Mon, 16 Oct 2017 13:08:22 +0200 Subject: [PATCH] Bug 19454: (Follow-up) Add a total line when updating Content-Type: text/plain; charset=utf-8 Test plan: [1] Run the script with -doit and -cat [some_category] and verify that the printed total is correct. Signed-off-by: Marcel de Rooy --- misc/maintenance/borrowers-force-messaging-defaults.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/misc/maintenance/borrowers-force-messaging-defaults.pl b/misc/maintenance/borrowers-force-messaging-defaults.pl index e9745f9..0ba85e4 100755 --- a/misc/maintenance/borrowers-force-messaging-defaults.pl +++ b/misc/maintenance/borrowers-force-messaging-defaults.pl @@ -57,6 +57,7 @@ sub force_borrower_messaging_defaults { $sql .= " AND categorycode = ?" if $category; my $sth = $dbh->prepare($sql); $sth->execute($since, $category || () ); + my $cnt = 0; while ( my ($borrowernumber, $categorycode) = $sth->fetchrow ) { print "$borrowernumber: $categorycode\n"; next unless $doit; @@ -64,8 +65,10 @@ sub force_borrower_messaging_defaults { borrowernumber => $borrowernumber, categorycode => $categorycode, } ); + $cnt++; } $dbh->commit(); + print "Total borrowers updated: $cnt\n" if $doit; } -- 2.1.4