From 1b7b8f1c70aed69239bb75eefacf4e51e66a0c90 Mon Sep 17 00:00:00 2001 From: bth Date: Sun, 7 Jun 2026 00:05:11 -0700 Subject: [PATCH] um-mode must inhibit ro because special-mode already is, i think --- um.el | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/um.el b/um.el index 5a222c5..34166e0 100644 --- a/um.el +++ b/um.el @@ -456,13 +456,14 @@ Optional TAGS string may contain more than one tag separated by a comma. \\{um-mode-map} " ;; restrict movement to (bolp) with cursor-intangible-mode - (save-excursion - (goto-char (point-min)) - (while (not (eobp)) - ;; NOTE: actually the newline is the only position not included, but this - ;; positions the cursor visually at the bol: - (put-text-property (pos-bol) (pos-eol) 'cursor-intangible t) - (forward-line 1))) + (let ((inhibit-read-only t)) + (save-excursion + (goto-char (point-min)) + (while (not (eobp)) + ;; NOTE: actually the newline is the only position not included, but this + ;; positions the cursor visually at the bol: + (put-text-property (pos-bol) (pos-eol) 'cursor-intangible t) + (forward-line 1)))) (cursor-intangible-mode) (read-only-mode))