Index: openacs-4/packages/dotlrn/tcl/club-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/club-procs.tcl,v
diff -u -N -r1.19 -r1.20
--- openacs-4/packages/dotlrn/tcl/club-procs.tcl	9 Aug 2002 19:01:27 -0000	1.19
+++ openacs-4/packages/dotlrn/tcl/club-procs.tcl	12 Aug 2002 20:30:22 -0000	1.20
@@ -95,16 +95,17 @@
     }
 
     ad_proc -public add_user {
-        {-rel_type "" }
+        {-rel_type ""}
         {-community_id:required}
         {-user_id:required}
-        {-member_state "approved"}
+        {-member_state approved}
     } {
         Assigns a user to a particular role for that club.
     } {
         if [empty_string_p $rel_type] {
             set rel_type "dotlrn_member_rel"
         }
+
         dotlrn_community::add_user_to_community \
             -rel_type $rel_type \
             -community_id $community_id \