(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.
This commit is contained in:
parent
c8be645598
commit
b0d261e29e
1 changed files with 7 additions and 5 deletions
|
|
@ -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.
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue