Index: openacs.org-dev/packages/acs-subsite/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-subsite/www/index.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-subsite/www/index.tcl	9 Jul 2002 17:34:59 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-subsite/www/index.tcl	8 Oct 2002 15:46:48 -0000	1.1.1.2
@@ -9,16 +9,19 @@
   @cvs-id $Id$
 } {
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     subsite_name:onevalue
     nodes:multirow
     admin_p:onevalue
+    user_id:onevalue
 }
 
-set context_bar {}
+set context [list]
 set package_id [ad_conn package_id]
 set admin_p [ad_permission_p $package_id admin]
 
+set user_id [ad_conn user_id]
+
 set subsite_name [db_string name {
     select acs_object.name(:package_id) from dual
 }]