Re: command to insert a "--text follows this line--"

[Kevin Rodgers]

Dan Jacobson wrote:
> In sendmail.el, in addition to
> C-c C-f C-a     mail-mail-reply-to
> C-c C-f C-b     mail-bcc
> C-c C-f C-c     mail-cc ...
> there ought to be a
> C-c C-f C-l     mail-separator
> which will insert a "--text follows this line--" line,
> for folks who have done M-x mail-mode on a buffer, and are inserting
> the components into that buffer one by one. (That buffer was already
> pretty much a mail message, or else one would have done C-x m).

Here's how mail-setup does it (point is already at the beginning of
the line):

    (put-text-property (point)
                       (progn
                         (insert mail-header-separator "\n")
                         (1- (point)))
                       'category 'mail-header-separator)

But mail-sendmail-delimit-header doesn't bother setting the category
text property or inserting the newline:

  (rfc822-goto-eoh)
  (insert mail-header-separator)

> Hmmm, in gnus this could be called message-insert-delimiter.

--
Kevin