Index: openacs-4/packages/acs-content-repository/tcl/item-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/Attic/item-procs-oracle.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-content-repository/tcl/item-procs-oracle.xql 25 Sep 2003 18:59:10 -0000 1.4
+++ openacs-4/packages/acs-content-repository/tcl/item-procs-oracle.xql 16 Jan 2004 18:29:32 -0000 1.5
@@ -85,4 +85,25 @@
+
+
+ begin
+ content_item.set_live_revision(
+ revision_id => :revision_id,
+ publish_status => 'live'
+ );
+ end;
+
+
+
+
+
+ begin
+ content_item.unset_live_revision(
+ item_id => :item_id
+ );
+ end;
+
+
+