From: Andreas Schwab Date: Mon, 24 Dec 2012 16:03:39 +0000 (+0100) Subject: * nnimap.el (nnimap-find-article-by-message-id): Don't error out if X-Git-Tag: emacs-24.2.92~90 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=216ed9cc435743a596b04917605d29f5ea562e7e;p=emacs.git * nnimap.el (nnimap-find-article-by-message-id): Don't error out if group is nil. --- 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)))