From db2ad631247a5c52d9d6f6779948f6d0cf34c698 Mon Sep 17 00:00:00 2001 From: Jeremie Juste Date: Tue, 28 Sep 2021 09:04:25 +0200 Subject: [PATCH] ob-R.el: Patch async evaluation when :results output * lisp/ob-R.el (ob-session-async-org-babel-R-evaluate-session): Make sure that `ess-inject-source' is set to the default 'function-and-buffer before running (ess-eval-buffer). Return `ess-inject-source' to its user-specified state afterwards. --- lisp/ob-R.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ob-R.el b/lisp/ob-R.el index 188b9ac8f..7e050c094 100644 --- a/lisp/ob-R.el +++ b/lisp/ob-R.el @@ -528,9 +528,13 @@ by `org-babel-comint-async-filter'." (insert (format ob-session-async-R-indicator "end" uuid)) (setq tmp ess-eval-visibly) + (setq user-inject-src-param ess-inject-source) (setq ess-eval-visibly nil) + (setq ess-inject-source 'function-and-buffer) (ess-eval-buffer nil)) - (setq ess-eval-visibly tmp) + (setq ess-eval-visibly tmp) + (setq ess-inject-source user-inject-src-param) + uuid)))) (defun ob-session-async-R-value-callback (params tmp-file) -- 2.30.2