@@ -, +, @@ value x in days_in_advance). --- .../borrowers-force-messaging-defaults.pl | 20 +++----------------- 1 file changed, 3 insertions(+), 17 deletions(-) --- a/misc/maintenance/borrowers-force-messaging-defaults.pl +++ a/misc/maintenance/borrowers-force-messaging-defaults.pl @@ -39,7 +39,7 @@ sub usage { sub force_borrower_messaging_defaults { - my ($doit, $truncate, $since, $not_expired) = @_; + my ($doit, $since, $not_expired) = @_; $since = '0000-00-00' if (!$since); print "Since: $since\n"; @@ -47,13 +47,6 @@ sub force_borrower_messaging_defaults { my $dbh = C4::Context->dbh; $dbh->{AutoCommit} = 0; - if ( $doit && $truncate ) { - $dbh->do(q|SET FOREIGN_KEY_CHECKS = 0|); - $dbh->do(q|TRUNCATE borrower_message_transport_preferences|); - $dbh->do(q|TRUNCATE borrower_message_preferences|); - $dbh->do(q|SET FOREIGN_KEY_CHECKS = 1|); - } - my $sql = "SELECT borrowernumber, categorycode FROM borrowers WHERE dateenrolled >= ?"; if ($not_expired) { $sql .= " AND dateexpiry >= NOW()" @@ -72,10 +65,9 @@ sub force_borrower_messaging_defaults { } -my ($doit, $truncate, $since, $help, $not_expired); +my ($doit, $since, $help, $not_expired); my $result = GetOptions( 'doit' => \$doit, - 'truncate' => \$truncate, 'since:s' => \$since, 'not-expired' => \$not_expired, 'help|h' => \$help, @@ -83,7 +75,7 @@ my $result = GetOptions( usage() if $help; -force_borrower_messaging_defaults( $doit, $truncate, $since, $not_expired ); +force_borrower_messaging_defaults( $doit, $since, $not_expired ); =head1 NAME @@ -94,7 +86,6 @@ borrowers-force-messaging-defaults.pl borrowers-force-messaging-defaults.pl borrowers-force-messaging-defaults.pl --help borrowers-force-messaging-defaults.pl --doit - borrowers-force-messaging-defaults.pl --doit --truncate borrowers-force-messaging-defaults.pl --doit --not-expired =head1 DESCRIPTION @@ -118,11 +109,6 @@ Prints this help Actually update the borrowers. -=item B<--truncate> - -Truncate all borrowers transport preferences before (re-)creating them. It -affects borrower_message_preferences table. - =item B<--not-expired> Will only update active borrowers (borrowers who didn't pass their expiration date). --