Index: openacs-4/packages/notifications/tcl/notification-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs-oracle.xql,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/notifications/tcl/notification-procs-oracle.xql	30 Sep 2003 12:10:08 -0000	1.5
+++ openacs-4/packages/notifications/tcl/notification-procs-oracle.xql	29 Jun 2004 10:18:42 -0000	1.6
@@ -22,5 +22,14 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="notification::new.update_message">
+        <querytext>
+                update notifications
+                set notif_html = empty_clob(),
+                notif_text = empty_clob()
+                where notification_id = :notification_id
+                returning notif_html, notif_text into :1, :2
+        </querytext>
+    </fullquery>
 
 </queryset>