um--reset-cursor-intangible-property : remove faces

2026-07-06 12:17:57 -07:00 · 2026-07-06 12:17:57 -07:00 · 3dcf437d3e
commit 3dcf437d3e
parent 45aeb73848
1 changed files with 5 additions and 1 deletions
--- a/um.el
+++ b/um.el
@ -566,7 +566,11 @@ A negative prefix argument moves it backward.
 (defun um--reset-cursor-intangible-property ()
  (let ((modified (buffer-modified-p)))
    ;; NOTE: remove all first, because otherwise we might miss a newline:
-    (remove-text-properties (point-min) (point-max) '(cursor-intangible t))
+    (remove-text-properties (point-min) (point-max)
+                            '(
+                              cursor-intangible t
+                              ;; NOTE: no faces in yanked text:
+                              face nil))
    (save-excursion
      (goto-char (point-min))
      (while (not (eobp))