[Emacs-diffs] /srv/bzr/emacs/emacs-24 r111076: * nnimap.el (nnimap-find-article-by-message-id): Don't error out if

[Andreas Schwab]

------------------------------------------------------------
revno: 111076
committer: Andreas Schwab <address@hidden>
branch nick: emacs
timestamp: Mon 2012-12-24 17:03:39 +0100
message:
  * nnimap.el (nnimap-find-article-by-message-id): Don't error out if
  group is nil.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/nnimap.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-12-23 17:43:34 +0000
+++ b/lisp/gnus/ChangeLog       2012-12-24 16:03:39 +0000
@@ -1,3 +1,8 @@
+2012-12-24  Andreas Schwab  <address@hidden>
+
+       * nnimap.el (nnimap-find-article-by-message-id): Don't error out if
+       group is nil.
+
 2012-12-23  Andreas Schwab  <address@hidden>
 
        * shr.el (shr-tag-em): Render as italic, not bold.

=== modified file 'lisp/gnus/nnimap.el'
--- a/lisp/gnus/nnimap.el       2012-07-25 03:22:25 +0000
+++ b/lisp/gnus/nnimap.el       2012-12-24 16:03:39 +0000
@@ -971,7 +971,7 @@
 (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)))