Re: Longlines and insert

[Kevin Rodgers <ihs_4664@yahoo.com>]

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