# HG changeset patch
# User Paul Reilly <pmr@pajato.com>
# Date 1220456128 0
# Node ID 13858591278ad8928453cde61b4dd90ea5ceb54a
# Parent  cc9bb337ef7c529d9ef6f49c2412e4188e87ebf8
*** empty log message ***

diff -r cc9bb337ef7c -r 13858591278a lisp/mail/ChangeLog.pmail
--- a/lisp/mail/ChangeLog.pmail	Wed Sep 03 15:33:38 2008 +0000
+++ b/lisp/mail/ChangeLog.pmail	Wed Sep 03 15:35:28 2008 +0000
@@ -1,3 +1,23 @@
+2008-09-03  pmr  <pmr@pajato.com>
+
+	* pmail.el, pmaildesc.el, pmailout.el:
+	Fix the expunge command so that the current message index is correct.
+
+	* pmail.el (pmail-expunge-counter): New variable
+	  (pmail-set-attribute): Canonicalize the calling sequence to index, attribute, state.
+	  (pmail-show-message, pmail-delete-message, pmail-undelete-previous-message,
+	   pmail-delete-forward, pmail-mark-message): Use the new canonical calling sequence.
+	  (pmail-only-expunge): Use the expunge counter to update the current message index.
+	  (pmail-expunge-callback): Simplify.  Just count the expunged messages with a lower
+	   index than the current message index.
+
+	* pmaildesc.el (pmail-desc-get-previous): Fix an "off by one" issue.
+	  (pmail-desc-set-attribute): Canonicalize the calling sequence to index, attribute, state.
+
+	* pmailout.el (pmail-output-body-to-file): Use the canonical calling sequence.
+
+	* sendmail.el (mail-yank-region): Fix comment.
+
 2008-09-02  Juanma Barranquero  <lekktu@gmail.com>
 
 	* mail/pmaildesc.el (pmail-desc-get-match-index):