From dbb3068bd3e22ee8d38c99c69061b26d3a4064d6 Mon Sep 17 00:00:00 2001 From: Bruno BARBIER Date: Tue, 15 Oct 2024 12:42:44 +0200 Subject: [PATCH] ob-scheme: Hack to pass the implementation to 'geiser-mode' --- lisp/ob-scheme.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ob-scheme.el b/lisp/ob-scheme.el index 29fdcd1ec..7bf8acf6c 100644 --- a/lisp/ob-scheme.el +++ b/lisp/ob-scheme.el @@ -184,7 +184,9 @@ (defun org-babel-scheme-execute-with-geiser (code output impl repl &optional hos (newline) (let ((beg (point))) (insert code) - (geiser-mode) + ;; Hack to pass our 'impl' to 'geiser-mode'. + (let ((geiser-impl--implementation impl)) + (geiser-mode)) (let ((geiser-repl-window-allow-split nil) (geiser-repl-use-other-window nil)) (let ((repl-buffer (save-current-buffer -- 2.45.2