aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2015-05-26 23:29:51 -0700
committerGlenn Morris2015-05-26 23:29:51 -0700
commitb38bc40d692f39d00477d5691acaa1046c74623c (patch)
tree0c5f4908b7c265693ec62db325433381692396e9
parentce32fb872b3ae1037be1106afa92410f0c349385 (diff)
downloademacs-b38bc40d692f39d00477d5691acaa1046c74623c.tar.gz
emacs-b38bc40d692f39d00477d5691acaa1046c74623c.zip
* lisp/mail/sendmail.el (mail-position-on-field): Doc fix.
-rw-r--r--lisp/mail/sendmail.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index ddd8697dcd6..2b9d8facae3 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1500,9 +1500,10 @@ just append to the file, in Babyl format if necessary."
1500 (insert "\nMail-Followup-To: ")))) 1500 (insert "\nMail-Followup-To: "))))
1501 1501
1502(defun mail-position-on-field (field &optional soft) 1502(defun mail-position-on-field (field &optional soft)
1503 "Move to the start of the contents of header field FIELD. 1503 "Move to the end of the contents of header field FIELD.
1504If there is none, insert one, unless SOFT is non-nil. 1504If there is no such header, insert one, unless SOFT is non-nil.
1505If there are multiple FIELD fields, this goes to the first." 1505If there are multiple FIELD fields, this goes to the first.
1506Returns non-nil if FIELD was originally present."
1506 (let (end 1507 (let (end
1507 (case-fold-search t)) 1508 (case-fold-search t))
1508 (setq end (mail-header-end)) 1509 (setq end (mail-header-end))