Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql,v
diff -u -N -r1.13 -r1.13.8.1
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql	8 Sep 2008 20:26:43 -0000	1.13
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql	25 Jul 2014 16:49:35 -0000	1.13.8.1
@@ -18,6 +18,8 @@
                    body,
                    package_id,
                    file_ids,
+                   filesystem_files,
+                   delete_filesystem_files_p,
                    mime_type,
                    no_callback_p,
                    extraheaders,
@@ -37,6 +39,8 @@
                    :body,
                    :package_id,
                    :file_ids,
+                   :filesystem_files,
+                   (case when :delete_filesystem_files_p = '1' then TRUE else FALSE end),
                    :mime_type,
                    (case when :no_callback_p = '1' then TRUE else FALSE end),
                    :extraheaders,
@@ -81,6 +85,8 @@
                    body,
                    package_id,
                    file_ids,
+                   (case when delete_filesystem_files_p = TRUE then 1 else 0 end) as delete_filesystem_files_p,
+		   filesystem_files,
                    mime_type,
                    (case when no_callback_p = TRUE then 1 else 0 end) as no_callback_p,
                    extraheaders,