Index: openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql 24 Jul 2001 19:51:56 -0000 1.3
+++ openacs-4/packages/static-pages/tcl/static-pages-procs-postgresql.xql 31 Jul 2001 14:29:50 -0000 1.4
@@ -36,11 +36,10 @@
- FIX ME LOB
- update cr_revisions set content = empty_blob()
- where revision_id = content_item.get_live_revision(:static_page_id)
- returning content into :1
-
+
+ update cr_revisions set content = :file
+ where revision_id = content_item__get_live_revisions(:static_page_id)
+
@@ -59,11 +58,11 @@
- FIX ME LOB
- update cr_revisions set content = empty_blob()
- where revision_id = content_item.get_live_revision(:static_page_id)
- returning content into :1
+ update cr_revisions set content = :file
+ where revision_id = content_item__get_live_revisions(:static_page_id)
+
+
@@ -119,5 +118,17 @@
+
+
+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
+
+
+
+
+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
+
+
+
+