From bd8c6db5dc15296bacb42cbc65b24e82d12b7cfb Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 16 Nov 2004 04:52:19 +0000 Subject: [PATCH] (compilation-setup): Don't set buffer-read-only. (compilation-mode): Set it here instead. --- lisp/progmodes/compile.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index fb2e2e78317..b73c9ca0007 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -1150,6 +1150,7 @@ Runs `compilation-mode-hook' with `run-hooks' (which see). (set (make-local-variable 'page-delimiter) compilation-page-delimiter) (compilation-setup) + (setq buffer-read-only t) (run-mode-hooks 'compilation-mode-hook)) (defmacro define-compilation-mode (mode name doc &rest body) @@ -1212,8 +1213,6 @@ If nil, use the beginning of buffer.") "Prepare the buffer for the compilation parsing commands to work. Optional argument MINOR indicates this is called from `compilation-minor-mode'." - (unless minor - (setq buffer-read-only t)) (make-local-variable 'compilation-current-error) (make-local-variable 'compilation-messages-start) (make-local-variable 'compilation-error-screen-columns) -- 2.39.5