Index: openacs-4/packages/acs-admin/www/users/member-state-change.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/member-state-change.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-admin/www/users/member-state-change.tcl	18 Sep 2002 14:54:47 -0000	1.9
+++ openacs-4/packages/acs-admin/www/users/member-state-change.tcl	11 Dec 2003 21:39:45 -0000	1.10
@@ -29,7 +29,7 @@
     where user_id = :user_id
 }]} {
     # The user is not in there
-    ad_return_complaint "Invalid User" "The user is not in the system"
+    ad_return_complaint 1 "Invalid User: the user is not in the system"
     return
 }
 
@@ -70,7 +70,7 @@
 }
 
 if [empty_string_p $action] {
-    ad_return_complaint "Not valid action" "You have not changed the user in any way"
+    ad_return_complaint 1 "Not valid action: You have not changed the user in any way"
     return
 }