Index: openacs-4/packages/acs-subsite/www/group-master.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/group-master.tcl,v diff -u -r1.11.10.1 -r1.11.10.2 --- openacs-4/packages/acs-subsite/www/group-master.tcl 13 Jul 2007 09:53:08 -0000 1.11.10.1 +++ openacs-4/packages/acs-subsite/www/group-master.tcl 19 Jul 2007 08:28:57 -0000 1.11.10.2 @@ -15,6 +15,21 @@ # But for now - kludge city. set system_name [ad_system_name] +if { [string equal [ad_conn url] "/"] } { + set system_url "" +} else { + set system_url [ad_url] +} + +if {[template::util::is_nil title]} { + # TODO: decide how best to set the lang attribute for the title + set title [ad_conn instance_name] +} + +if {![template::multirow exists link]} { + template::multirow create link rel type href title lang media +} + set untrusted_user_id [ad_conn untrusted_user_id] set sw_admin_p 0