From: Dave Abrahams <dave@boostpro.com>
Date: Mon, 20 Aug 2012 02:44:57 +0000 (-0400)
Subject: gnus-try-warping-via-registry: [bugfix] don't act as though you've found the article... 
X-Git-Url: https://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=fcd4880bf7576ea1e4af89dfeb547dd33109a592

gnus-try-warping-via-registry: [bugfix] don't act as though you've found the article when you haven't
---

diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el
index 8aecc98ee..71e009675 100644
--- a/lisp/gnus-registry.el
+++ b/lisp/gnus-registry.el
@@ -1169,9 +1169,10 @@ data stored in the registry."
 
             ;; Try to activate the group.  If that fails, just move
             ;; along.  We may have more groups to work with
-            (ignore-errors
-	      (gnus-select-group-with-message-id group message-id))
-            (throw 'found t)))))))
+            (when
+                (ignore-errors
+                  (gnus-select-group-with-message-id group message-id) t)
+              (throw 'found t))))))))
 
 ;; TODO: a few things