Index: openacs-4/packages/acs-subsite/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/index.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/acs-subsite/www/index.tcl	22 Sep 2003 11:20:47 -0000	1.12
+++ openacs-4/packages/acs-subsite/www/index.tcl	2 Oct 2003 22:04:46 -0000	1.13
@@ -35,17 +35,11 @@
 
 set user_id [ad_conn user_id]
 
-set subsite_name [db_string name {
-    select acs_object.name(:package_id) from dual
-}]
+set subsite_name [ad_conn instance_name]
 
 set subsite_url [subsite::get_element -element url]
 
-set node_id [ad_conn node_id]
 
-db_multirow nodes site_nodes {}
-
-
 # User's group membership
 
 set group_id [application_group::group_id_from_package_id]