Function: edt-page-forward
edt-page-forward is an interactive and byte-compiled function defined
in edt.el.gz.
Signature
(edt-page-forward NUM)
Documentation
Move forward to just after next page delimiter.
Argument NUM is the number of page delimiters to move.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/emulation/edt.el.gz
;;;;
;;;; EDT Emulation Commands
;;;;
;; Almost all of EDT's keypad mode commands have equivalent Emacs
;; function counterparts. But many of these counterparts behave
;; somewhat differently in Emacs.
;;
;; So, the following Emacs functions emulate, where practical, the
;; exact behavior of the corresponding EDT keypad mode commands. In
;; a few cases, the emulation is not exact, but it should be close
;; enough for most EDT die-hards.
;;
;;;
;;; PAGE
;;;
;; Emacs uses the regexp assigned to page-delimiter to determine what
;; marks a page break. This is normally "^\f", which causes the
;; edt-page command to ignore form feeds not located at the beginning
;; of a line. To emulate the EDT PAGE command exactly,
;; page-delimiter is set to "\f" when EDT emulation is turned on, and
;; restored to its original value when EDT emulation is turned off.
;; But this can be overridden if the EDT definition is not desired by
;; placing
;;
;; (setq edt-keep-current-page-delimiter t)
;;
;; in your init file.
(defun edt-page-forward (num)
"Move forward to just after next page delimiter.
Argument NUM is the number of page delimiters to move."
(interactive "p")
(edt-check-prefix num)
(if (eobp)
(error "End of buffer")
(progn
(forward-page num)
(if (eobp)
(edt-line-to-bottom-of-window)
(edt-line-to-top-of-window)))))