From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 13 Jan 2013 19:48:04 +0000 (-0500)
Subject: Doc fix.
X-Git-Tag: emacs-24.3.90~173^2~7^2~311
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f7e86ef2881feee4eb84b94e66c3fe764db1850;p=emacs.git

Doc fix.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f39727164b3..371665b5a57 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-01-13  Richard Stallman  <rms@gnu.org>
 
+	* mail/sendmail.el (mail-position-on-field): Add doc string.
+
 	* mail/rmailmm.el (rmail-insert-mime-forwarded-message): Get
 	current message boundaries and pass them to
 	message-forward-make-body-mime.  Minor style changes.
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index e86229a5cfb..e1dee3295f2 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1493,6 +1493,9 @@ 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."
   (let (end
 	(case-fold-search t))
     (setq end (mail-header-end))