From ec8f245d27113d51ed5fda4cd18387acef61286c Mon Sep 17 00:00:00 2001 From: Achim Gratz Date: Wed, 10 Sep 2014 11:22:43 +0200 Subject: [PATCH] ob-eval: Do not use read-only mode, switch to compilation mode only once * lisp/ob-eval.el (org-babel-eval): Switch to compilation mode only if the current mode is not already (a derived mode of) compilation-mode. Remove the read-only state from the buffer directly without using `read-only-mode'. --- lisp/ob-eval.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/ob-eval.el b/lisp/ob-eval.el index 9fbbb42f5..b3ce2af5d 100644 --- a/lisp/ob-eval.el +++ b/lisp/ob-eval.el @@ -60,9 +60,10 @@ STDERR with `org-babel-eval-error-notify'." (save-excursion (when (get-buffer org-babel-error-buffer-name) (with-current-buffer org-babel-error-buffer-name - (compilation-mode) - ;;compilation-mode enforces read-only - (read-only-mode 0)))) + (unless (derived-mode-p 'compilation-mode) + (compilation-mode)) + ;; Compilation-mode enforces read-only, but Babel expects the buffer modifiable. + (setq buffer-read-only nil)))) nil) (buffer-string))))) -- 2.11.4.GIT