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.21 -r1.22 --- openacs-4/packages/notifications/tcl/sweep-procs.tcl 26 Feb 2005 17:52:22 -0000 1.21 +++ openacs-4/packages/notifications/tcl/sweep-procs.tcl 27 Jun 2007 18:54:48 -0000 1.22 @@ -46,6 +46,7 @@ set list_of_notification_ids [list] set batched_content_text "" set batched_content_html "" + set batched_file_ids [list] set summary_text "[_ notifications.Contents]/n" set summary_html "
" + set batched_file_ids [concat [ns_set get $notif file_ids] $batched_file_ids] + lappend list_of_notification_ids [ns_set get $notif notification_id] # Set the vars @@ -154,6 +159,7 @@ -subject [ns_set get $notif notif_subject] \ -content_text [ns_set get $notif notif_text] \ -content_html [ns_set get $notif notif_html] \ + -file_ids [ns_set get $notif file_ids] \ -reply_object_id [ns_set get $notif response_id] \ -delivery_method_id [ns_set get $notif delivery_method_id]