Index: openacs-4/packages/acs-subsite/lib/subsites.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/subsites.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/acs-subsite/lib/subsites.tcl 30 Jan 2004 15:17:54 -0000 1.11 +++ openacs-4/packages/acs-subsite/lib/subsites.tcl 24 Mar 2004 00:01:18 -0000 1.12 @@ -8,7 +8,6 @@ lappend actions [_ acs-subsite.Create_new_subsite] "[subsite::get_element -element url]admin/subsite-add" {} } - list::create \ -name subsites \ -multirow subsites \ @@ -17,7 +16,7 @@ -elements { instance_name { label "[_ acs-subsite.Name]" - link_url_eval "$name/" + link_url_eval "$url/" } num_members { label "\# [_ acs-subsite.Members]" @@ -51,6 +50,7 @@ p.instance_name, n.node_id, n.name, + :subsite_url || n.name as url, (select count(*) from group_approved_member_map m where m.rel_type = 'membership_rel'