Index: openacs-4/packages/static-pages/tcl/static-pages-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/static-pages/tcl/static-pages-procs.xql	6 May 2001 19:54:35 -0000	1.2
+++ openacs-4/packages/static-pages/tcl/static-pages-procs.xql	31 Jul 2001 14:29:50 -0000	1.3
@@ -73,16 +73,23 @@
 </fullquery>
 
 
+<fullquery name="sp_serve_html_page.get_page_info">
+	<querytext>
+select '{'||content_item__get_title(:page_id)||'} '|| (CASE WHEN show_comments_p='t' then '1' else '0' END) from static_pages where static_page_id = :page_id
+	</querytext>
+</fullquery>
+
 <fullquery name="sp_flush_page.get_page_info">
       <querytext>
-      sp_get_page_info_query $page_id
+select '{'||content_item__get_title(:page_id)||'} '|| (CASE WHEN show_comments_p='t' then '1' else '0' END) from static_pages where static_page_id = :page_id
       </querytext>
 </fullquery>
 
 
 <fullquery name="sp_flush_page.get_page_info">
       <querytext>
-      sp_get_page_info_query $page_id
+select '{'||content_item__get_title(:page_id)||'} '|| (CASE WHEN show_comments_p='t' then '1' else '0' END) from static_pages where static_page_id = :page_id
+
       </querytext>
 </fullquery>