add -t flag to bulk void for payment type, RT#73413

[freeside.git] / bin / test_scrub

diff --git a/bin/test_scrub b/bin/test_scrub
index e39a28a..850801f 100644 (file)
--- a/bin/test_scrub
+++ b/bin/test_scrub
@@ -23,13 +23,13 @@ getopts('h');
 
 adminsuidsetup shift;
 
+#  payment_gateway
+#  payment_gateway_option
+#  agent_payment_gateway
 foreach my $table (qw(
-  part_export
-  part_export_option
   export_svc
-  payment_gateway
-  payment_gateway_option
-  agent_payment_gateway
+  part_export_option
+  part_export
   queue
   queue_arg
 )) {
@@ -43,7 +43,7 @@ my $dsth = dbh->prepare("DELETE FROM cust_main_invoice WHERE dest != 'POST'")
   or die dbh->errstr;
 $dsth->execute or die $dsth->errstr;
 
-foreach my $table (qw( cust_main
+foreach my $table (qw( cust_main cust_payby
                        cust_pay_pending cust_pay cust_pay_void cust_pay_batch
                        cust_refund
 )) {