auto_recenter.el

(defun etc-maybe-recenter ()
  (unless (or
           ;; don't interfere with erc scroll-to-bottom
           (derived-mode-p 'erc-mode 'term-mode 'shell-mode 'eshell-mode)
           (not (eq (get-buffer-window (current-buffer) t) (selected-window)))
           (equal (window-point) (point-max))
           (region-active-p)
           )
    (recenter)))

(defvar etc-recenter-timer nil)
(progn
  (when etc-recenter-timer
    (cancel-timer etc-recenter-timer))
  (setq etc-recenter-timer nil)
  (setq etc-recenter-timer (run-with-idle-timer 0.25 t #'etc-maybe-recenter)))