Index: openacs-4/packages/dotlrn/tcl/community-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v diff -u -r1.41 -r1.42 --- openacs-4/packages/dotlrn/tcl/community-procs.xql 22 Mar 2002 22:23:54 -0000 1.41 +++ openacs-4/packages/dotlrn/tcl/community-procs.xql 22 Mar 2002 22:55:29 -0000 1.42 @@ -320,6 +320,18 @@ + + +select 1 from dotlrn_active_comms_not_closed where community_id= :community_id and join_policy = 'open' + + + + + +select 1 from dotlrn_active_comms_not_closed where community_id= :community_id and join_policy = 'needs approval' + + + select portal_template_id from dotlrn_communities where community_id= :community_id