(gnus-group-goto-group): Return correct value after previous patch

* lisp/gnus/gnus-group.el (gnus-group-goto-group): Return the
correct value after the previous patch.

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index a53adecd11082756c185014dad4190c877ddf1b3..271c3c838bfe9af00756c1bc93e53e544855a46a 100644 (file)
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -2607,11 +2607,13 @@ If TEST-MARKED, the line must be marked."
          found))
        (t
        ;; Search through the entire buffer.
-       (unless (gnus-goto-char
-                (text-property-any
-                 (point-min) (point-max)
-                 'gnus-group (gnus-intern-safe group gnus-active-hashtb)))
-         (goto-char start)))))))
+       (if (gnus-goto-char
+            (text-property-any
+             (point-min) (point-max)
+             'gnus-group (gnus-intern-safe group gnus-active-hashtb)))
+           (point)
+         (goto-char start)
+         nil))))))
 
 (defun gnus-group-next-group (n &optional silent)
   "Go to next N'th newsgroup.