@@ -, +, @@ the printed total is correct. --- misc/maintenance/borrowers-force-messaging-defaults.pl | 3 +++ 1 file changed, 3 insertions(+) --- a/misc/maintenance/borrowers-force-messaging-defaults.pl +++ a/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; } --