* mu4e: don't add rogue \n where re-editing
This commit is contained in:
@ -356,7 +356,6 @@ tempfile)."
|
|||||||
;; insert mail-header-separator, which is needed by message mode to separate
|
;; insert mail-header-separator, which is needed by message mode to separate
|
||||||
;; headers and body. will be removed before saving to disk
|
;; headers and body. will be removed before saving to disk
|
||||||
(mu4e~draft-insert-mail-header-separator)
|
(mu4e~draft-insert-mail-header-separator)
|
||||||
(insert "\n") ;; insert a newline after header separator
|
|
||||||
;; include files -- e.g. when forwarding a message with attachments,
|
;; include files -- e.g. when forwarding a message with attachments,
|
||||||
;; we take those from the original.
|
;; we take those from the original.
|
||||||
(save-excursion
|
(save-excursion
|
||||||
|
|||||||
@ -254,7 +254,7 @@ separator is never written to the message file. Also see
|
|||||||
;; search for the first empty line
|
;; search for the first empty line
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(if (search-forward-regexp "^$" nil t)
|
(if (search-forward-regexp "^$" nil t)
|
||||||
(replace-match (concat sepa))
|
(replace-match sepa)
|
||||||
(progn ;; no empty line? then prepend one
|
(progn ;; no empty line? then prepend one
|
||||||
(goto-char (point-max))
|
(goto-char (point-max))
|
||||||
(insert "\n" sepa))))))
|
(insert "\n" sepa))))))
|
||||||
|
|||||||
Reference in New Issue
Block a user