Index: openacs-4/packages/page/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/page/www/index.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/page/www/index.tcl	13 Mar 2001 22:59:27 -0000	1.1
+++ openacs-4/packages/page/www/index.tcl	24 Sep 2004 11:45:22 -0000	1.2
@@ -1,5 +1,4 @@
 # packages/page/www/index.tcl
-
 ad_page_contract {
 
   @author rhs@mit.edu
@@ -35,19 +34,9 @@
 if {[llength $controls] > 0} {
   set control_html "\[ [join $controls " | "] \]"
 } else {
-  set control_html " "
+    set control_html {}
 }
 
-set body "[ad_header $instance_name]
+set body [template::adp_include /packages/page/lib/one-page [list title $instance_name content $content control_html $control_html]]
 
-<h2>$instance_name</h2>
-
-<table width=100%><tr><td>[ad_context_bar]</td><td align=right>$control_html</td></table>
-<hr>
-
-$content
-
-[ad_footer]
-"
-
 doc_return 200 text/html $body