adding wipe-agent script, RT#10679

diff --git a/bin/wipe-agent b/bin/wipe-agent
index fbe58a8..0e1846a 100644 (file)
--- a/bin/wipe-agent
+++ b/bin/wipe-agent
@@ -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