aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTony Zorman2025-08-05 13:08:43 +0200
committerEli Zaretskii2025-08-07 16:09:59 +0300
commitcf86e00c8d07d7380ef732f4d6972ffd83778baa (patch)
tree1276113152f68d73d2a33d1d4262b957448dffb1
parent3d8fbb0716df669b552daef8ada02b4357ca7b49 (diff)
downloademacs-cf86e00c8d07d7380ef732f4d6972ffd83778baa.tar.gz
emacs-cf86e00c8d07d7380ef732f4d6972ffd83778baa.zip
; * lisp/indent-aux.el: Fix deindenting read-only text (bug#79176).
-rw-r--r--lisp/indent-aux.el15
1 files changed, 8 insertions, 7 deletions
diff --git a/lisp/indent-aux.el b/lisp/indent-aux.el
index eeb8f1ee6bb..4a05136ac1a 100644
--- a/lisp/indent-aux.el
+++ b/lisp/indent-aux.el
@@ -50,13 +50,14 @@ is yanked."
50 (delete-and-extract-region beg end) 50 (delete-and-extract-region beg end)
51 (buffer-substring beg end)))) 51 (buffer-substring beg end))))
52 (with-temp-buffer 52 (with-temp-buffer
53 ;; Indent/deindent the same as the major mode in the original 53 (let ((inhibit-read-only t))
54 ;; buffer. 54 ;; Indent/deindent the same as the major mode in the original
55 (setq indent-tabs-mode i-t-m) 55 ;; buffer.
56 (insert text) 56 (setq indent-tabs-mode i-t-m)
57 (indent-rigidly (point-min) (point-max) 57 (insert text)
58 (- indentation)) 58 (indent-rigidly (point-min) (point-max)
59 (buffer-string)))) 59 (- indentation))
60 (buffer-string)))))
60 61
61;;;###autoload 62;;;###autoload
62(define-minor-mode kill-ring-deindent-mode 63(define-minor-mode kill-ring-deindent-mode