Index: openacs-4/packages/notifications/tcl/notification-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.xql,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/notifications/tcl/notification-procs.xql 13 Jan 2005 13:58:33 -0000 1.8
+++ openacs-4/packages/notifications/tcl/notification-procs.xql 15 Jun 2005 18:36:17 -0000 1.8.2.1
@@ -81,4 +81,28 @@
+
+
+ select notification_id, notif_subject
+ from notifications
+ where notif_user = :user_id
+
+
+
+
+
+ update notifications
+ set notif_user = :to_user_id
+ where notif_user = :from_user_id
+
+
+
+
+
+ update notification_user_map
+ set user_id = :to_user_id
+ where user_id = :from_user_id
+
+
+