Index: openacs-4/packages/static-portlet/tcl/static-portal-content-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/tcl/static-portal-content-procs.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/static-portlet/tcl/static-portal-content-procs.xql 23 Jul 2002 13:40:45 -0000 1.2
+++ openacs-4/packages/static-portlet/tcl/static-portal-content-procs.xql 29 Jun 2004 10:18:47 -0000 1.3
@@ -24,7 +24,7 @@
update static_portal_content set
- content = :content, pretty_name = :pretty_name
+ body = :content, pretty_name = :pretty_name
where content_id = :content_id
@@ -45,4 +45,12 @@
+
+
+ select body
+ from static_portal_content
+ where content_id = :content_id
+
+
+