mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00
Code Issues Releases Activity

* lisp/mail/sendmail.el (mail-position-on-field): Doc fix.

Browse Source
This commit is contained in:
Glenn Morris 2015-05-26 23:29:51 -07:00
parent ce32fb872b
commit b38bc40d69
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/mail/sendmail.el
View File

@ -1500,9 +1500,10 @@ just append to the file, in Babyl format if necessary."
(insert "\nMail-Followup-To: "))))
(defun mail-position-on-field (field &optional soft)
"Move to the start of the contents of header field FIELD.
If there is none, insert one, unless SOFT is non-nil.
If there are multiple FIELD fields, this goes to the first."
"Move to the end of the contents of header field FIELD.
If there is no such header, insert one, unless SOFT is non-nil.
If there are multiple FIELD fields, this goes to the first.
Returns non-nil if FIELD was originally present."
(let (end
(case-fold-search t))
(setq end (mail-header-end))