scroll to most distant future reference

Emanuel Berg via General discussion about ERC <[email protected]> Wed, 27 Apr 2022 05:28:42 +0200

Newsgroups	gmane.emacs.erc.general
Message-ID	<[email protected]>

;;; -*- lexical-binding: t -*-

(require 'erc)

(defun next-mention (&optional nick)
  (interactive)
  (let ((nck (or nick erc-nick))
        (ori (point))
        (beg (point-min))
        (end (point-max)) )
    (if (re-search-backward (format "<%s>" nck) beg t)
        (goto-char (match-end 0))
      (goto-char beg) )
    (if (re-search-forward nck end t)
        (goto-char (match-beginning 0))
      (goto-char ori) )))
(defalias 'nm #'next-mention)

https://dataswamp.org/~incal/emacs-init/erc/erc-scroll.el

-- 
underground experts united
https://dataswamp.org/~incal