From da9cae93e180463bb158461f5d008da83c172ed7 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Mon, 16 Mar 2009 01:39:28 +0100 Subject: Many a bug fix in multiple implementation support. --- elisp/geiser-mode.el | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'elisp/geiser-mode.el') diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index 57fb84e..3e9e3c1 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -131,6 +131,13 @@ With prefix, recursively macro-expand the resulting expression." (interactive "P") (geiser-expand-region (save-excursion (backward-sexp) (point)) (point) all)) +(defun geiser-set-scheme () + "Associates current buffer with a given Scheme implementation." + (interactive) + (let ((impl (geiser-impl--read-impl))) + (geiser-impl--set-buffer-implementation impl) + (geiser-repl--get-repl impl))) + ;;; Geiser mode: -- cgit v1.2.3