Re: Longlines and insert

[Kevin Rodgers]

Chong Yidong wrote:
> The problem is that mail-setup inserts the header fields by calling
>
>   (insert "blahblah\n")
>
> The inserted newlines are not marked as hard, so longlines gets
> confused.
>
> I could fix this by going through sendmail.el and adding (newline) to
> all these places.  But maybe a more wide-reaching solution is called
> for.

How about a less invasive change?  The headers are actually inserted
like this:

(insert header "\n")

Which I think could be fixed like this:

(let ((hard-newline "\n"))
  ;; see set-hard-newline-properties:
  (put-text-property 0 1 'hard t hard-newline)
  (put-text-property 0 1 'rear-nonsticky '(hard) hard-newline)
  ...
  (insert header hard-newline))

--
Kevin Rodgers