From 216ed9cc435743a596b04917605d29f5ea562e7e Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Mon, 24 Dec 2012 17:03:39 +0100 Subject: [PATCH] * nnimap.el (nnimap-find-article-by-message-id): Don't error out if group is nil. --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/nnimap.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 2cb9489e86e..ece158142c6 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2012-12-24 Andreas Schwab + + * nnimap.el (nnimap-find-article-by-message-id): Don't error out if + group is nil. + 2012-12-23 Andreas Schwab * shr.el (shr-tag-em): Render as italic, not bold. diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 5126c25f66b..7a7d67517c6 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -971,7 +971,7 @@ textual parts.") (defun nnimap-find-article-by-message-id (group message-id) (with-current-buffer (nnimap-buffer) (erase-buffer) - (unless (equal group (nnimap-group nnimap-object)) + (unless (or (not group) (equal group (nnimap-group nnimap-object))) (setf (nnimap-group nnimap-object) nil) (setf (nnimap-examined nnimap-object) group) (nnimap-send-command "EXAMINE %S" (utf7-encode group t))) -- 2.11.4.GIT