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 -N -r1.11 -r1.11.2.1 --- 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 25 Apr 2004 09:41:06 -0000 1.11.2.1 @@ -17,7 +17,7 @@ -elements { instance_name { label "[_ acs-subsite.Name]" - link_url_eval "$name/" + link_url_col url } num_members { label "\# [_ acs-subsite.Members]" @@ -46,7 +46,7 @@ set untrusted_user_id [ad_conn untrusted_user_id] -db_multirow -extend { join_url request_url } subsites select_subsites { +db_multirow -extend { url join_url request_url } subsites select_subsites { select p.package_id, p.instance_name, n.node_id, @@ -80,4 +80,5 @@ order by upper(instance_name) } { set join_url [export_vars -base "${subsite_url}register/user-join" { group_id { return_url [ad_return_url] } }] + set url $subsite_url$name }