Lines Matching defs:field
290 and that one match a certain header field, Rmail shows the field.
434 message. If any of the field regexp's are nil, then it is ignored.
439 FIELD is the plain text name of a field in the message, such as
441 all text from the \"cc\" field as well.
1960 (quoted-printable-header-field-end
1966 (base64-header-field-end
1977 (if quoted-printable-header-field-end
1984 (goto-char quoted-printable-header-field-end)
1987 (if base64-header-field-end
1998 (goto-char base64-header-field-end)
2064 ;; If this message has a Content-Length field,
2070 (quoted-printable-header-field-end
2075 (base64-header-field-end
2087 ;; Get the numeric value from the Content-Length field.
2090 ;; in case the Content-Length field comes first.
2114 (message "Ignoring invalid Content-Length field")
2127 (if quoted-printable-header-field-end
2134 (goto-char quoted-printable-header-field-end)
2137 (if base64-header-field-end
2153 (goto-char base64-header-field-end)
2230 ;; have a Date: field.
2248 ;; have a From: field.
2732 "Handle a \"Mail-Followup-To\" header field with an unknown mailing list.
2736 (let ((mail-followup-to (mail-fetch-field "mail-followup-to" nil t)))
3003 (let ((from (mail-fetch-field "from"))
3004 (subj (mail-fetch-field "subject"))
3005 (to (concat (mail-fetch-field "to") "," (mail-fetch-field "cc")))
3017 (t (mail-fetch-field (car directive-loop))))))
3108 (or (string-match recipients (or (mail-fetch-field "To") ""))
3109 (string-match recipients (or (mail-fetch-field "From") ""))
3111 (string-match recipients (or (mail-fetch-field "Cc") ""))))))
3265 (let ((subject (or (mail-fetch-field "Subject") "")))
3585 (setq from (mail-fetch-field "from")
3586 reply-to (or (mail-fetch-field "mail-reply-to" nil t)
3587 (mail-fetch-field "reply-to" nil t)
3589 subject (mail-fetch-field "subject")
3590 date (mail-fetch-field "date")
3591 message-id (mail-fetch-field "message-id")
3592 references (mail-fetch-field "references" nil nil t)
3593 resent-reply-to (mail-fetch-field "resent-reply-to" nil t)
3595 (mail-fetch-field "resent-cc" nil t))
3596 resent-to (or (mail-fetch-field "resent-to" nil t) "")
3597 ;;; resent-subject (mail-fetch-field "resent-subject")
3598 ;;; resent-date (mail-fetch-field "resent-date")
3599 ;;; resent-message-id (mail-fetch-field "resent-message-id")
3602 (if (mail-fetch-field "mail-followup-to" nil t)
3603 ;; If this header field is present, use it instead of the To and CC fields.
3604 (setq to (mail-fetch-field "mail-followup-to" nil t))
3605 (setq cc (or (mail-fetch-field "cc" nil t) "")
3606 to (or (mail-fetch-field "to" nil t) ""))))
3640 (rmail-make-in-reply-to-field from date message-id)
3669 (defun rmail-make-in-reply-to-field (from date message-id)
3693 (let ((field (prin1-to-string tem)))
3695 (concat field "'s message of " date)
3696 field)))))
3717 (let ((field (substring from start end)))
3718 (if date (setq field (concat "message from " field " on " date)))
3721 (concat message-id " (" field ")")
3722 field))))
3726 (rmail-make-in-reply-to-field from date message-id)))))
3739 (let ((from (or (mail-fetch-field "From")
3740 (mail-fetch-field ">From"))))
3744 (or (mail-fetch-field "Subject") "")
3815 ;; Delete any Sender field, since that's not specifiable.
3918 (mail-fetch-field "Content-Type") ))))
4001 (setq resending (mail-fetch-field "resent-to"))
4007 (mail-position-on-field (if resending "Resent-To" "To") t))))))