From ef87675055fd9ff2c92ee90515ae43c737fc5187 Mon Sep 17 00:00:00 2001
From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
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 <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Charles Farmer <charles.farmer@inLibro.com>
---
 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 897f5df..e327834 100755
--- a/misc/maintenance/borrowers-force-messaging-defaults.pl
+++ b/misc/maintenance/borrowers-force-messaging-defaults.pl
@@ -60,6 +60,7 @@ WHERE bo.dateenrolled >= ?|;
     $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;
@@ -67,8 +68,10 @@ WHERE bo.dateenrolled >= ?|;
             borrowernumber => $borrowernumber,
             categorycode   => $categorycode,
         } );
+        $cnt++;
     }
     $dbh->commit();
+    print "Total borrowers updated: $cnt\n" if $doit;
 }
 
 
-- 
2.1.4