From 2611d9ab9b3a32d1757a9304cdc53f3d4ca707e8 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Thu, 17 Mar 2011 17:45:14 +0100 Subject: [PATCH] (nnimap-fetch-inbox): Rewrite slightly last patch. --- lisp/ChangeLog | 4 ++++ lisp/nnimap.el | 12 +++++++----- 2 files changed, 11 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1b4fc6bf5..9c1b8834b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-03-17 Lars Magne Ingebrigtsen + + * nnimap.el (nnimap-fetch-inbox): Rewrite slightly last patch. + 2011-03-17 Bjørn Mork * nnimap.el (nnimap-fetch-inbox): Don't download bodies on ver4-capable diff --git a/lisp/nnimap.el b/lisp/nnimap.el index 46c56d9fb..bcbe7b678 100644 --- a/lisp/nnimap.el +++ b/lisp/nnimap.el @@ -1764,11 +1764,13 @@ textual parts.") (if (nnimap-ver4-p) "BODY.PEEK" "RFC822.PEEK")) - (if nnimap-split-download-body-default - "[]" - (if (nnimap-ver4-p) - "[HEADER]" - "[1]")))) + (cond + (nnimap-split-download-body-default + "[]") + ((nnimap-ver4-p) + "[HEADER]") + (t + "[1]")))) t)) (defun nnimap-split-incoming-mail () -- 2.25.1