* lisp/simple.el (rfc822-goto-eoh): Give it a doc-string.
This commit is contained in:
parent
b8bd990898
commit
41002397ee
2 changed files with 6 additions and 1 deletions
|
@ -1,5 +1,7 @@
|
|||
2011-02-17 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* 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)
|
||||
|
||||
|
|
|
@ -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)
|
||||
|
|
Loading…
Add table
Reference in a new issue