* mu4e-compose.el: mark the message-separator as read-only, and fontify it

This commit is contained in:
djcb 2012-06-04 12:17:51 +02:00
parent fd8e0f3166
commit 90f43084e6
1 changed files with 3 additions and 1 deletions

View File

@ -231,7 +231,9 @@ and the body starts. Note, in `mu4e-compose-mode, we use
separator is never written to file. Also see
`mu4e-remove-mail-header-separator'."
(save-excursion
(let ((sepa (propertize mail-header-separator 'intangible t)))
(let ((sepa (propertize mail-header-separator
'intangible t 'read-only t
'font-lock-face 'mu4e-system-face)))
(goto-char (point-min))
;; search for the first empty line
(if (search-forward-regexp "^$" nil t)