Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql,v diff -u -r1.15 -r1.16 --- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql 9 Jan 2008 12:11:55 -0000 1.15 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql 9 Jan 2008 13:19:10 -0000 1.16 @@ -1,44 +1,6 @@ - - - - update acs_mail_lite_mail_log - set last_mail_date = sysdate - where party_id = :user_id - - - - - - - - insert into acs_mail_lite_mail_log (party_id, last_mail_date) - values (:user_id, sysdate) - - - - - - - - update acs_mail_lite_bounce - set bounce_count = bounce_count + 1 - where party_id = :rcpt_id - - - - - - - - insert into acs_mail_lite_bounce (party_id, bounce_count) - values (:rcpt_id, 1) - - - -