(compilation-setup): Don't set buffer-read-only if MINOR is non-nil.

This commit is contained in:
Richard M. Stallman 2004-10-19 16:48:30 +00:00
parent 08dedea656
commit 4f331dedca

View file

@ -1186,7 +1186,8 @@ 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'."
(setq buffer-read-only t)
(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)