From d485cecc04bbdd3fff177b3c179ca1fd1dbc9500 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Sat, 2 May 2009 22:37:56 +0200
Subject: PLT in default implementations at startup.

---
 elisp/geiser.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'elisp')

diff --git a/elisp/geiser.el b/elisp/geiser.el
index 146f421..c57e971 100644
--- a/elisp/geiser.el
+++ b/elisp/geiser.el
@@ -95,7 +95,7 @@
     '(add-hook 'scheme-mode-hook 'turn-on-geiser-mode)))
 
 (defun geiser-setup-implementations (impls)
-  (setq geiser-impl--impls (append '(guile) impls)))
+  (setq geiser-impl--impls (or impls '(guile plt))))
 
 (defun geiser-setup (&rest impls)
   (geiser-setup-implementations impls)
-- 
cgit v1.2.3