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.5 -r1.6
--- openacs-4/packages/acs-subsite/www/index.tcl	16 Sep 2002 12:58:04 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/index.tcl	16 Jan 2003 13:38:49 -0000	1.6
@@ -28,11 +28,8 @@
 
 set node_id [ad_conn node_id]
 
-db_multirow nodes site_nodes {
-  select site_node.url(n.node_id) as url, acs_object.name(n.object_id) as name
-    from site_nodes n
-   where n.parent_id = :node_id
-    and n.object_id is not null
-}
+db_multirow nodes site_nodes {}
 
+set login_url "register/?[export_vars { { return_url {[ad_conn url]}} }]"
+
 ad_return_template