Index: openacs-4/packages/notifications/tcl/sweep-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/sweep-procs.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/notifications/tcl/sweep-procs.tcl	17 May 2003 10:54:26 -0000	1.14
+++ openacs-4/packages/notifications/tcl/sweep-procs.tcl	28 Aug 2003 09:41:58 -0000	1.15
@@ -128,12 +128,13 @@
                 db_transaction {
                     # Send it
                     notification::delivery::send \
-                            -to_user_id [ns_set get $notif user_id] \
-                            -notification_type_id [ns_set get $notif type_id] \
-                            -subject [ns_set get $notif notif_subject] \
-                            -content [ns_set get $notif notif_text] \
-                            -reply_object_id [ns_set get $notif response_id] \
-                            -delivery_method_id [ns_set get $notif delivery_method_id]
+                        -from_user_id [ns_set get $notif notif_user] \
+                        -to_user_id [ns_set get $notif user_id] \
+                        -notification_type_id [ns_set get $notif type_id] \
+                        -subject [ns_set get $notif notif_subject] \
+                        -content [ns_set get $notif notif_text] \
+                        -reply_object_id [ns_set get $notif response_id] \
+                        -delivery_method_id [ns_set get $notif delivery_method_id]
                     
                     # Markt it as sent
                     notification::mark_sent \