[gnus git] branch master updated: n0-17-220-ga85b6c0 =1= * nnimap.el (nnimap-transform-headers): Fix parsing message size for MESSAGE/RFC822.
Andrew Cohen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via a85b6c0cac52ac62abb9d441175b2bef31e8beb2 (commit)
from 43cdbaa607cf52cfaf0cd70209c1409544cf5617 (commit)
- Log -----------------------------------------------------------------
commit a85b6c0cac52ac62abb9d441175b2bef31e8beb2
Author: Andrew Cohen <[email protected]>
Date: Thu Aug 11 16:20:00 2011 -0400
* nnimap.el (nnimap-transform-headers): Fix parsing message size for
MESSAGE/RFC822.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 76d3ade..6d14c67 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-08-11 Andrew Cohen <[email protected]>
+
+ * nnimap.el (nnimap-transform-headers): BODYSTRUCTURE for messages of
+ type MESSAGE and subtype RFC822 is slightly different from those of
+ type TEXT.
+
2011-08-05 Andrew Cohen <[email protected]>
* gnus-sum.el (gnus-summary-refer-article): Warp to article. This
diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index f41f4af..c940e06 100644
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -218,7 +218,11 @@ textual parts.")
(while (and (consp structure)
(not (stringp (car structure))))
(setq structure (car structure)))
- (setq lines (nth 7 structure))))
+ (setq lines (if (and
+ (equal (upcase (nth 0 structure)) "MESSAGE")
+ (equal (upcase (nth 1 structure)) "RFC822"))
+ (nth 9 structure)
+ (nth 7 structure)))))
(delete-region (line-beginning-position) (line-end-position))
(insert (format "211 %s Article retrieved." article))
(forward-line 1)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 6 ++++++
lisp/nnimap.el | 6 +++++-
2 files changed, 11 insertions(+), 1 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project