Function: scroll-all-check-to-scroll

scroll-all-check-to-scroll is a byte-compiled function defined in scroll-all.el.gz.

Signature

(scroll-all-check-to-scroll)

Documentation

Check this-command to see if a scroll is to be done.

Source Code

;; Defined in /usr/src/emacs/lisp/scroll-all.el.gz
(defun scroll-all-check-to-scroll ()
  "Check `this-command' to see if a scroll is to be done."
  (cond ((eq this-command 'next-line)
	 (call-interactively 'scroll-all-scroll-down-all))
	((eq this-command 'previous-line)
	 (call-interactively 'scroll-all-scroll-up-all))
	((memq this-command '(scroll-up scroll-up-command))
	 (call-interactively 'scroll-all-page-down-all))
	((memq this-command '(scroll-down scroll-down-command))
	 (call-interactively 'scroll-all-page-up-all))
	((eq this-command 'beginning-of-buffer)
	 (call-interactively 'scroll-all-beginning-of-buffer-all))
	((eq this-command 'end-of-buffer)
	 (call-interactively 'scroll-all-end-of-buffer-all))))