Function: pixel-scroll-pixel-down

pixel-scroll-pixel-down is a byte-compiled function defined in pixel-scroll.el.gz.

Signature

(pixel-scroll-pixel-down AMT)

Documentation

Scroll text of selected windows down AMT pixels.

Scope moves upward.

Source Code

;; Defined in /usr/src/emacs/lisp/pixel-scroll.el.gz
  (pixel--whistlestop-pixel-up amt)) ; minor scroll

(defun pixel-scroll-pixel-down (amt)
  "Scroll text of selected windows down AMT pixels.
Scope moves upward."
  (while (> amt 0)
    (let ((vs (window-vscroll nil t)))
      (if (equal vs 0)
          (progn
            ;; On horizontal scrolling, move cursor.
            (when (> (window-hscroll) 0)
              (vertical-motion -1))
            (pixel-scroll-down-and-set-window-vscroll
             (1- (pixel-line-height -1))))
        (set-window-vscroll nil (1- vs) t))
      (setq amt (1- amt))
      (sit-for pixel-wait))))