Fix org-mu4e-compose.el

This commit is contained in:
2026-07-19 02:22:14 -07:00
parent 0363599aef
commit 20be5dd80f
+3 -3
View File
@@ -144,9 +144,9 @@ The affected area is START to END in the current buffer."
(while (looking-at (rx bol ">" (or " " eol)))
(forward-line -1))
(end-of-line)
(insert "\n#+BEGIN_VERSE"))
(insert "\n#+BEGIN_VERSE")))
(defun org-mu4e--textify-org-part ()
(defun org-mu4e--textify-org-part ()
"Replace the org part of the current buffer with plain text."
(when-let* ((bounds (org-mu4e--bounds-of-mime-part "text/plain")))
(with-restriction (car bounds) (cdr bounds)
@@ -157,7 +157,7 @@ The affected area is START to END in the current buffer."
after-change-functions)))
(delete-region (point-min) (point-max))
(insert ascii-content)
(put-text-property (point-min) (point-max) 'font-lock-face 'default))))))
(put-text-property (point-min) (point-max) 'font-lock-face 'default)))))
(defun org-mu4e--htmlize-and-cleanup ()
"HTMLize and cleanup the visible portion of the buffer.