Index: openacs-4/packages/acs-content-repository/tcl/content-revision-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-revision-procs-oracle.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-content-repository/tcl/content-revision-procs-oracle.xql	13 Feb 2005 02:10:31 -0000	1.4
+++ openacs-4/packages/acs-content-repository/tcl/content-revision-procs-oracle.xql	24 Feb 2005 13:41:22 -0000	1.5
@@ -19,7 +19,17 @@
         set    content = empty_blob()
         where  revision_id = :revision_id
         returning content into :1
-</querytext>
+    </querytext>
   </fullquery>
-  
+
+  <fullquery name="content::revision::new.update_lob_attribute">
+    <querytext>
+		update $lob_table
+		set $lob_attribute = empty_clob()
+		where $lob_id_column = :revision_id
+		returning $lob_attribute into :1
+    </querytext>
+  </fullquery>
+
 </queryset>
+