Function: rfc822-goto-eoh
rfc822-goto-eoh is a byte-compiled function defined in simple.el.gz.
Signature
(rfc822-goto-eoh)
Documentation
If the buffer starts with a mail header, move point to the header's end.
Otherwise, moves to point-min.
The end of the header is the start of the next line, if there is one,
else the end of the last line. This function obeys RFC 822 (or later).
Source Code
;; Defined in /usr/src/emacs/lisp/simple.el.gz
(defun rfc822-goto-eoh ()
"If the buffer starts with a mail header, move point to the header's end.
Otherwise, moves to `point-min'.
The end of the header is the start of the next line, if there is one,
else the end of the last line. This function obeys RFC 822 (or later)."
(goto-char (point-min))
(when (re-search-forward
"^\\([:\n]\\|[^: \t\n]+[ \t\n]\\)" nil 'move)
(goto-char (match-beginning 0))))