RT# 38517 - Added Lingua::EN::NameParse to parse real name into first and last name.

[freeside.git] / bin / wipe-agent

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