Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v
diff -u -r1.92.2.6 -r1.92.2.7
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	11 Jan 2016 10:16:17 -0000	1.92.2.6
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	11 Jan 2016 16:14:37 -0000	1.92.2.7
@@ -641,7 +641,7 @@
                 -filesystem_files $filesystem_files \
                 -delete_filesystem_files_p $delete_filesystem_files_p \
                 -object_id $object_id \
-                -status $status
+                -status $status \
                 -errorMsg $errorMsg
         }
         
Index: openacs-4/packages/bulk-mail/tcl/bulk-mail-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bulk-mail/tcl/bulk-mail-procs.tcl,v
diff -u -r1.12.2.2 -r1.12.2.3
--- openacs-4/packages/bulk-mail/tcl/bulk-mail-procs.tcl	8 Jan 2016 21:26:25 -0000	1.12.2.2
+++ openacs-4/packages/bulk-mail/tcl/bulk-mail-procs.tcl	11 Jan 2016 16:14:37 -0000	1.12.2.3
@@ -277,8 +277,8 @@
                     -reply_to $reply_to \
                     -extraheaders $extra_headers \
                     -use_sender \
-                    -package_id $package_id \
-                    -object_id $bulk_mail_id
+                    -package_id [ns_set get $bulk_mail package_id] \
+                    -object_id [ns_set get $bulk_mail bulk_mail_id]
             }
 
             # mark the bulk_mail as sent so that we don't process it again