Index: openacs-4/packages/acs-subsite/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/index.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-subsite/www/index.adp	6 Sep 2002 21:49:56 -0000	1.3
+++ openacs-4/packages/acs-subsite/www/index.adp	16 Sep 2002 12:58:04 -0000	1.4
@@ -16,3 +16,6 @@
   <li> <a href="admin/">Administration</a></li>
  </if>
 </ul>
+
+<if @user_id@ eq 0><a href="/register/?return_url=/">login</a></if>
+<else><a href="register/logout">logout</a></else>
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.4 -r1.5
--- openacs-4/packages/acs-subsite/www/index.tcl	6 Sep 2002 21:49:56 -0000	1.4
+++ openacs-4/packages/acs-subsite/www/index.tcl	16 Sep 2002 12:58:04 -0000	1.5
@@ -13,12 +13,15 @@
     subsite_name:onevalue
     nodes:multirow
     admin_p:onevalue
+    user_id:onevalue
 }
 
 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
 }]