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")