Function: smart-gnus-article-assist

smart-gnus-article-assist is an interactive and byte-compiled function defined in hui-mouse.el.

Signature

(smart-gnus-article-assist)

Documentation

Use an assist key or mouse assist key to move through Gnus netnews articles.

Invoked via an assist key press when in gnus-article-mode. It assumes that its caller has already checked that the assist key was pressed in an appropriate buffer and has moved the cursor to the selected buffer.

If assist key is pressed within:
 (1) the first line or end of an article, the previous message is displayed;
 (2) the first line of an Info cross reference, the reference is followed;
 (3) anywhere else, the window is scrolled down a windowful.

Key Bindings

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hui-mouse.el
(defun smart-gnus-article-assist ()
  "Use an assist key or mouse assist key to move through Gnus netnews articles.

Invoked via an assist key press when in `gnus-article-mode'.  It
assumes that its caller has already checked that the assist key
was pressed in an appropriate buffer and has moved the cursor to
the selected buffer.

If assist key is pressed within:
 (1) the first line or end of an article, the previous message is displayed;
 (2) the first line of an Info cross reference, the reference is followed;
 (3) anywhere else, the window is scrolled down a windowful."
  (interactive)
  (cond ((or (last-line-p) (and (not (eolp)) (first-line-p)))
	 (unwind-protect
	     (progn (set-buffer gnus-summary-buffer)
		    (setq this-command 'gnus-summary-prev-article)
		    (gnus-summary-prev-article nil)
		    (gnus-summary-goto-subject gnus-current-article))
	   (let ((artic (get-buffer-window gnus-summary-buffer)))
	     (if artic (select-window artic)))))
	((and (not (eolp)) (Info-handle-in-note)))
	(t (smart-scroll-down))))