summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-08-24 13:39:08 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-08-24 13:39:41 +0200
commit25ee1ff2065d7421295e3ff6912538c84084c32c (patch)
tree9d98ee8d31bd971dbb62d7843900eb21c2560435
parentfd74c6f4b81ffb6b373993ef2a5d80f888842397 (diff)
downloademacs-25ee1ff2065d7421295e3ff6912538c84084c32c.tar.gz
Don't lose read-only marking when reverting a view-mode buffer
* lisp/view.el (view--enable): Don't lose read-only-ness when reverting (bug#35166).
-rw-r--r--lisp/view.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/view.el b/lisp/view.el
index 287112f2d44..1207f01db21 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -441,7 +441,9 @@ Entry to view-mode runs the normal hook `view-mode-hook'."
(setq view-page-size nil
view-half-page-size nil
view-old-buffer-read-only buffer-read-only
- buffer-read-only t))
+ buffer-read-only t)
+ ;; Make reverting the buffer preserve unreadableness.
+ (setq-local read-only-mode--state t))
(define-obsolete-function-alias 'view-mode-enable 'view-mode "24.4")