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.38 -r1.39 --- openacs-4/packages/dotlrn/tcl/community-procs.xql 16 Mar 2002 17:29:09 -0000 1.38 +++ openacs-4/packages/dotlrn/tcl/community-procs.xql 16 Mar 2002 18:59:03 -0000 1.39 @@ -190,14 +190,15 @@ - select dotlrn_communities.community_id, - dotlrn_communities.community_type, - dotlrn_communities.community_key, - dotlrn_communities.pretty_name, - dotlrn_communities.package_id - from dotlrn_communities, + select dotlrn_communities_full.community_id, + dotlrn_communities_full.community_type, + dotlrn_communities_full.community_key, + dotlrn_communities_full.pretty_name, + dotlrn_communities_full.package_id, + dotlrn_communities_full.url + from dotlrn_communities_full, dotlrn_member_rels_approved - where dotlrn_communities.community_id = dotlrn_member_rels_approved.community_id + where dotlrn_communities_full.community_id = dotlrn_member_rels_approved.community_id and dotlrn_member_rels_approved.user_id = :user_id