Function: gnus-summary-go-to-next-thread

gnus-summary-go-to-next-thread is a byte-compiled function defined in gnus-sum.el.gz.

Signature

(gnus-summary-go-to-next-thread &optional PREVIOUS)

Documentation

Go to the same level (or less) next thread.

If PREVIOUS is non-nil, go to previous thread instead. Return the article number moved to, or nil if moving was impossible.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-sum.el.gz
(defun gnus-summary-go-to-next-thread (&optional previous)
  "Go to the same level (or less) next thread.
If PREVIOUS is non-nil, go to previous thread instead.
Return the article number moved to, or nil if moving was impossible."
  (let ((level (gnus-summary-thread-level))
	(way (if previous -1 1))
	(beg (point)))
    (forward-line way)
    (while (and (not (eobp))
		(< level (gnus-summary-thread-level)))
      (forward-line way))
    (if (eobp)
	(progn
	  (goto-char beg)
	  nil)
      (setq beg (point))
      (prog1
	  (gnus-summary-article-number)
	(goto-char beg)))))