Function: mh-letter-previous-header-field
mh-letter-previous-header-field is an interactive and byte-compiled
function defined in mh-letter.el.gz.
Signature
(mh-letter-previous-header-field)
Documentation
Cycle to the previous header field.
This command moves backwards between the fields and cycles to the
body of the message after the first field. Unlike the command
M-x mh-letter-next-header-field-or-indent (mh-letter-next-header-field-or-indent), it will always take
point to the last field from anywhere in the body.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mh-e/mh-letter.el.gz
(defun mh-letter-previous-header-field ()
"Cycle to the previous header field.
This command moves backwards between the fields and cycles to the
body of the message after the first field. Unlike the command
\\[mh-letter-next-header-field-or-indent], it will always take
point to the last field from anywhere in the body."
(interactive)
(let ((header-end (mh-mail-header-end)))
(if (>= (point) header-end)
(goto-char header-end)
(mh-header-field-beginning))
(cond ((re-search-backward mh-letter-header-field-regexp nil t)
(if (mh-letter-skipped-header-field-p (match-string 1))
(mh-letter-previous-header-field)
(goto-char (match-end 0))
(mh-letter-skip-leading-whitespace-in-header-field)))
(t (goto-char header-end)
(forward-line)))))