Index: openacs-4/packages/bulk-mail/sql/postgresql/bulk-mail-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bulk-mail/sql/postgresql/bulk-mail-create.sql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bulk-mail/sql/postgresql/bulk-mail-create.sql	27 Oct 2014 16:41:06 -0000	1.5
+++ openacs-4/packages/bulk-mail/sql/postgresql/bulk-mail-create.sql	11 Dec 2018 10:38:05 -0000	1.6
@@ -42,9 +42,10 @@
                                 check (status in ('pending', 'cancelled', 'sent'))
                                 constraint bm_messages_status_nn
                                 not null
-                                
 );
 
+CREATE INDEX bm_messages_status_idx ON bulk_mail_messages(status);
+
 -- create a new object type
 CREATE OR REPLACE FUNCTION inline_0 () RETURNS integer AS $$
 BEGIN
