Function: message-mail-p
message-mail-p is a byte-compiled function defined in message.el.gz.
Signature
(message-mail-p)
Documentation
Say whether the current buffer contains a mail message.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-mail-p ()
"Say whether the current buffer contains a mail message."
(and (not message-this-is-news)
(or message-this-is-mail
(save-excursion
(save-restriction
(message-narrow-to-headers)
(or (message-fetch-field "to")
(message-fetch-field "cc")
(message-fetch-field "bcc")))))))