Index: openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-postgresql.xql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-postgresql.xql 12 Jul 2009 01:08:30 -0000 1.6 +++ openacs-4/packages/acs-messaging/tcl/acs-messaging-procs-postgresql.xql 20 Nov 2017 13:34:01 -0000 1.7 @@ -3,23 +3,6 @@ postgresql7.1 - - - - insert into acs_messages_outgoing - (message_id, to_address, grouping_id, wait_until) - select :m__message_id, p.email, q.grouping_id, - coalesce(q.wait_until, current_timestamp) as wait_until - from ($query) q, parties p - where not exists (select 1 from acs_messages_outgoing o - where o.message_id = :m__message_id - and p.email = o.to_address) - and p.party_id = q.recipient_id - - - - - select acs_message__message_p(:message_id); @@ -31,27 +14,5 @@ select acs_message__first_ancestor(:message_id) as ancestor_id - - - - select o.message_id as sending_message_id, - o.to_address as recip_email, - p.email as sender_email, - to_char(m.sent_date, 'Dy, DD Mon YYYY HH24:MI:SS') as sent_date, - m.rfc822_id, - m.title, - m.mime_type, - m.content, - m2.rfc822_id as in_reply_to - from acs_messages_outgoing o, - acs_messages_all m left outer join acs_messages_all m2 on (m2.message_id = m.reply_to), - parties p - where o.message_id = m.message_id - and p.party_id = m.sender - and wait_until <= current_timestamp - - - -