Index: openacs-4/packages/ecommerce/www/admin/customer-service/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/customer-service/spam.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/ecommerce/www/admin/customer-service/spam.tcl	25 Aug 2008 05:42:51 -0000	1.7
+++ openacs-4/packages/ecommerce/www/admin/customer-service/spam.tcl	25 Aug 2008 12:32:34 -0000	1.8
@@ -76,7 +76,7 @@
 }
 
 
-set title  "Spam Users"
+set title  "Email Users"
 set context [list [list index "Customer Service"] $title]
 
 
@@ -87,10 +87,10 @@
 
 foreach {v name widget} [list ml_body {Mailing lists} $mailing_list_widget uc_body {User classes} $user_class_widget c_body {Category} $only_category_widget] {
     if {[string equal [string trim $widget] "<b>none</b>"]} {
-        set $v  "$name: $widget - No one to spam.\n"
+        set $v  "$name: $widget - No one to email.\n"
     } else {
         set $v "<form method=post action=spam-2>
-<p>$name: $widget <br><input type=checkbox name=show_users_p value=\"t\" checked>Show me the users who will be spammed.</p>
+<p>$name: $widget <br><input type=checkbox name=show_users_p value=\"t\" checked>Show me the users who will be emailed.</p>
  <center><input type=submit value=\"Continue\"></center></form>\n"        
     }
 }