Index: openacs-4/packages/acs-mail-lite/acs-mail-lite.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/acs-mail-lite.info,v
diff -u -r1.61 -r1.62
--- openacs-4/packages/acs-mail-lite/acs-mail-lite.info	20 Jun 2018 18:10:26 -0000	1.61
+++ openacs-4/packages/acs-mail-lite/acs-mail-lite.info	5 Dec 2018 12:45:08 -0000	1.62
@@ -9,7 +9,7 @@
     <implements-subsite-p>f</implements-subsite-p>
     <inherit-templates-p>t</inherit-templates-p>
     
-    <version name="5.10.0d6" url="http://openacs.org/repository/download/apm/acs-mail-lite-5.10.0d6.apm">
+    <version name="5.10.0d7" url="http://openacs.org/repository/download/apm/acs-mail-lite-5.10.0d7.apm">
         <owner url="mailto:timo@studio-k4.de">Timo Hentschel</owner>
         <owner url="mailto:malte.sussdorff@cognovis.de">Malte Sussdorff</owner>
         <summary>Simplified reliable email transmission with bounce management.</summary>
@@ -18,7 +18,7 @@
         <description format="text/html">This package provides a service for sending and receiving messages, messages are queued in the database to ensure reliable sending and make sending a message &#39;transactional&#39;. Replacement for acs-mail.</description>
         <maturity>3</maturity>
 
-        <provides url="acs-mail-lite" version="5.10.0d6"/>
+        <provides url="acs-mail-lite" version="5.10.0d7"/>
         <requires url="acs-kernel" version="5.9.0"/>
         <requires url="acs-service-contract" version="5.9.0"/>
         <requires url="acs-tcl" version="5.10.0d8"/>
Index: openacs-4/packages/acs-mail-lite/sql/postgresql/acs-mail-lite-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/sql/postgresql/acs-mail-lite-create.sql,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/acs-mail-lite/sql/postgresql/acs-mail-lite-create.sql	29 Mar 2018 17:28:50 -0000	1.19
+++ openacs-4/packages/acs-mail-lite/sql/postgresql/acs-mail-lite-create.sql	5 Dec 2018 12:45:08 -0000	1.20
@@ -400,6 +400,8 @@
 	on acs_mail_lite_ie_section_ref_map (section_id);
 
 --
+-- TODO: this table does not exists for Oracle.... Not needed there?
+--
 create table acs_mail_lite_send_msg_id_map (
        -- a randomized number unique to this table
        -- unique not null
@@ -425,3 +427,9 @@
 create index acs_mail_lite_send_msg_id_map_msg_id_idx
        on acs_mail_lite_send_msg_id_map (msg_id);
 
+--
+-- Speed up referential integrity
+--
+CREATE INDEX acs_mail_lite_send_msg_id_map_package_id_idx ON acs_mail_lite_send_msg_id_map(package_id);
+CREATE INDEX acs_mail_lite_send_msg_id_map_party_id_idx   ON acs_mail_lite_send_msg_id_map(party_id);
+CREATE INDEX acs_mail_lite_send_msg_id_map_object_id_idx  ON acs_mail_lite_send_msg_id_map(object_id);
Index: openacs-4/packages/acs-mail-lite/sql/postgresql/upgrade/upgrade-5.10.0d6-5.10.0d7.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/sql/postgresql/upgrade/upgrade-5.10.0d6-5.10.0d7.sql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-mail-lite/sql/postgresql/upgrade/upgrade-5.10.0d6-5.10.0d7.sql	5 Dec 2018 12:45:08 -0000	1.1
@@ -0,0 +1,24 @@
+
+
+DO $$
+DECLARE
+        v_found boolean;
+BEGIN
+        --
+        -- Was the index already created?
+        --
+        SELECT exists(
+           SELECT relname from pg_class
+           WHERE relname ='acs_mail_lite_send_msg_id_map_party_id_idx'
+        ) into v_found;
+        
+        if v_found IS FALSE then
+           --
+           -- speed up referential integrity
+           --
+	   CREATE INDEX acs_mail_lite_send_msg_id_map_package_id_idx ON acs_mail_lite_send_msg_id_map(package_id);
+	   CREATE INDEX acs_mail_lite_send_msg_id_map_party_id_idx   ON acs_mail_lite_send_msg_id_map(party_id);
+	   CREATE INDEX acs_mail_lite_send_msg_id_map_object_id_idx  ON acs_mail_lite_send_msg_id_map(object_id);
+        end if;
+END$$;
+