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.25 -r1.26
--- openacs-4/packages/notifications/tcl/sweep-procs.tcl	7 Aug 2017 23:48:13 -0000	1.25
+++ openacs-4/packages/notifications/tcl/sweep-procs.tcl	1 May 2018 09:06:57 -0000	1.26
@@ -142,7 +142,7 @@
                 append batched_content_text "[_ notifications.SUBJECT] [ns_set get $notif notif_subject]\n[ns_set get $notif notif_text]\n=====================\n"
                 append batched_content_html "<a name=[ns_set get $notif notification_id]>[_ notifications.SUBJECT]</a> [ns_set get $notif notif_subject]\n $notif_html <hr><p>"
 
-		set batched_file_ids [concat [ns_set get $notif file_ids] $batched_file_ids]
+		set batched_file_ids [linsert $batched_file_ids 0 [ns_set get $notif file_ids]]
 		
                 lappend list_of_notification_ids [ns_set get $notif notification_id]