71513: Card tokenization [upgrade implemented]
[freeside.git] / bin / wipe-agent
index fbe58a8..0e1846a 100644 (file)
@@ -22,7 +22,7 @@ foreach my $cust_main (
 
 ) {
 
-  warn "deleting ". $cust_main->name. "\n";
+  warn "deleting ". $cust_main->custnum.': '. $cust_main->name. "\n";
 
   unless ( $opt_d ) { #dry run