From 41002397eec14de42b7786f4ecc195388d8cd309 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 16 Feb 2011 23:43:53 -0800 Subject: [PATCH] * lisp/simple.el (rfc822-goto-eoh): Give it a doc-string. --- lisp/ChangeLog | 2 ++ lisp/simple.el | 5 ++++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 638342739e1..98a9e06e406 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2011-02-17 Glenn Morris + * simple.el (rfc822-goto-eoh): Give it a doc-string. + * log-edit.el (log-edit-insert-changelog): Fix `log-edit-strip-single-file-name' functionality. (Bug#8057) diff --git a/lisp/simple.el b/lisp/simple.el index 6e26e334372..8f37c8e5f0b 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -5585,7 +5585,10 @@ appears to have customizations applying to the old default, 'mail-send-and-exit) (defun rfc822-goto-eoh () - ;; Go to header delimiter line in a mail message, following RFC822 rules + "If the buffer starts with a mail header, move point to the header's end. +Otherwise, moves to `point-min'. +The end of the header is the start of the next line, if there is one, +else the end of the last line. This function obeys RFC822." (goto-char (point-min)) (when (re-search-forward "^\\([:\n]\\|[^: \t\n]+[ \t\n]\\)" nil 'move) -- 2.39.2