Function: gnus-summary-search-article-forward
gnus-summary-search-article-forward is an interactive and
byte-compiled function defined in gnus-sum.el.gz.
Signature
(gnus-summary-search-article-forward REGEXP &optional BACKWARD)
Documentation
Search for an article containing REGEXP forward.
If BACKWARD, search backward instead.
Probably introduced at or before Emacs version 28.1.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-sum.el.gz
(defun gnus-summary-search-article-forward (regexp &optional backward)
"Search for an article containing REGEXP forward.
If BACKWARD, search backward instead."
(interactive
(list
(read-string
(format-prompt "Search article %s (regexp)"
gnus-last-search-regexp
(if current-prefix-arg "backward" "forward")))
current-prefix-arg)
gnus-summary-mode)
(if (string-equal regexp "")
(setq regexp (or gnus-last-search-regexp ""))
(setq gnus-last-search-regexp regexp)
(setq gnus-article-before-search gnus-current-article))
;; Intentionally set gnus-last-article.
(setq gnus-last-article gnus-article-before-search)
(let ((gnus-last-article gnus-last-article))
(if (gnus-summary-search-article regexp backward)
(gnus-summary-show-thread)
(signal 'search-failed (list regexp)))))