Fix indexing of Gnus entry in gnus-group-unsubscribe-group

* lisp/gnus/gnus-group.el (gnus-group-unsubscribe-group): Hopefully
  that's the last of these.

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index bdc8c38b1bbbaec20869ec73157ea51d1eb3d5e9..299ebdec50a5cdacf1002afd69a524117744fd40 100644 (file)
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -3814,7 +3814,7 @@ group line."
      (newsrc
       ;; Toggle subscription flag.
       (gnus-group-change-level
-       newsrc (if level level (if (<= (gnus-info-level (nth 2 newsrc))
+       newsrc (if level level (if (<= (gnus-info-level (nth 1 newsrc))
                                      gnus-level-subscribed)
                                  (1+ gnus-level-subscribed)
                                gnus-level-default-subscribed)))