Function: rmail-summary-scroll-msg-down
rmail-summary-scroll-msg-down is an interactive and byte-compiled
function defined in rmailsum.el.gz.
Signature
(rmail-summary-scroll-msg-down &optional DIST)
Documentation
Scroll the Rmail window backward.
If the Rmail window is now displaying the beginning of a message, move to the previous message.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mail/rmailsum.el.gz
(defun rmail-summary-scroll-msg-down (&optional dist)
"Scroll the Rmail window backward.
If the Rmail window is now displaying the beginning of a message,
move to the previous message."
(interactive "P")
(if (eq dist '-)
(rmail-summary-scroll-msg-up nil)
(let ((rmail-buffer-window (get-buffer-window rmail-buffer)))
(if rmail-buffer-window
(if (let ((rmail-summary-window (selected-window)))
(select-window rmail-buffer-window)
(prog1
;; Is BOB visible in the buffer?
(pos-visible-in-window-p (point-min))
(select-window rmail-summary-window)))
(if (not rmail-summary-scroll-between-messages)
(error "Beginning of buffer")
(rmail-summary-previous-msg (or dist 1)))
(let ((other-window-scroll-buffer rmail-buffer))
(scroll-other-window-down dist)))
;; If it isn't visible at all, show the beginning.
(rmail-summary-beginning-of-message)))))