Function: newsticker--buffer-make-item-completely-visible
newsticker--buffer-make-item-completely-visible is a byte-compiled
function defined in newst-plainview.el.gz.
Signature
(newsticker--buffer-make-item-completely-visible)
Documentation
Scroll buffer until current item is completely visible.
Source Code
;; Defined in /usr/src/emacs/lisp/net/newst-plainview.el.gz
;; ======================================================================
;;; Functions working on the *newsticker* buffer
;; ======================================================================
(defun newsticker--buffer-make-item-completely-visible ()
"Scroll buffer until current item is completely visible."
(when newsticker--auto-narrow-to-feed
(let* ((min (or (save-excursion (newsticker--buffer-beginning-of-feed))
(point-min)))
(max (or (save-excursion (newsticker--buffer-end-of-feed))
(point-max))))
(narrow-to-region min max)))
(when newsticker--auto-narrow-to-item
(let* ((min (or (save-excursion (newsticker--buffer-beginning-of-item))
(point-min)))
(max (or (save-excursion (newsticker--buffer-end-of-item))
(point-max))))
(narrow-to-region min max)))
(sit-for 0)
;; do not count lines and stuff because that does not work when images
;; are displayed. Do it the simple way:
(save-excursion
(newsticker--buffer-end-of-item)
(unless (pos-visible-in-window-p)
(recenter -1)))
(unless (pos-visible-in-window-p)
(recenter 0)))