X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Ftest_scrub;h=ef1571415cc73032f24b7d13b25421edff3a87e1;hp=e39a28a4e7eadaee418e432ba527dae5ac9e1ae8;hb=8692ef291d699282bfaaa2c86f9662c8977c0ee9;hpb=7a24977570328ce710e55d13cfd0fe5c5c40e67a diff --git a/bin/test_scrub b/bin/test_scrub index e39a28a4e..ef1571415 100644 --- a/bin/test_scrub +++ b/bin/test_scrub @@ -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 )) {