Index: openacs-4/packages/acs-subsite/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/index.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/acs-subsite/www/admin/index.tcl 17 Sep 2003 12:13:25 -0000 1.10 +++ openacs-4/packages/acs-subsite/www/admin/index.tcl 2 Oct 2003 22:15:49 -0000 1.11 @@ -29,12 +29,9 @@ set acs_lang_admin_url "[apm_package_url_from_key "acs-lang"]admin/" +if { [string equal [ad_conn package_url] "/"] } { + set subsite_label "community" +} else { + set subsite_label "subcommunity" +} - -# Dirk: temporary fix for noquote hacking -set acs_admin_available_p 1 -set instance_name "foobar" - -set context {} - -ad_return_template