Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -r1.168 -r1.169 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 30 Aug 2002 15:13:22 -0000 1.168 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 10 Oct 2002 06:07:25 -0000 1.169 @@ -713,7 +713,7 @@ } ad_proc -public add_user { - {-rel_type ""} + {-rel_type dotlrn_member_rel} {-member_state approved} community_id user_id @@ -1189,7 +1189,7 @@ append chunk ">Request Membership\n" } else { - append chunk "\"Join\"\n" + append chunk "Join\n" } append chunk " \]\n"