From b0d261e29e5c1ffb9bc76e3519dd7525ab1edac4 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 17 Apr 2018 02:11:02 +0200 Subject: [PATCH] (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. --- lisp/gnus/gnus-group.el | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index a53adecd110..271c3c838bf 100644 --- 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. -- 2.39.5