summaryrefslogtreecommitdiff
path: root/elisp/geiser-impl.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-07 22:53:32 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-07 22:53:32 +0200
commit5170efb520bad180bfca68828c644b59834457c8 (patch)
tree8dd167dba880b8529dc272b90933ea0d34293e9b /elisp/geiser-impl.el
parentfbd678c1d48c69e7a07730eea9a852236b9af737 (diff)
downloadgeiser-5170efb520bad180bfca68828c644b59834457c8.tar.gz
geiser-5170efb520bad180bfca68828c644b59834457c8.tar.bz2
Better handling of initial setup (registering implementations).
Diffstat (limited to 'elisp/geiser-impl.el')
-rw-r--r--elisp/geiser-impl.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/elisp/geiser-impl.el b/elisp/geiser-impl.el
index ac6c2b9..75a4ca7 100644
--- a/elisp/geiser-impl.el
+++ b/elisp/geiser-impl.el
@@ -41,6 +41,11 @@
:type 'symbol
:group 'geiser-impl)
+(defcustom geiser-impl-installed-implementations nil
+ "Initial list of installed Scheme implementations."
+ :type '(repeat symbol)
+ :group 'geiser-impl)
+
;;; Registering implementations:
@@ -209,5 +214,10 @@ implementation to be used by Geiser."))
(load-library (format "geiser-%s" impl))))
+;;; Initialization:
+
+(mapc 'geiser-impl--register geiser-impl-installed-implementations)
+
+
(provide 'geiser-impl)
;;; geiser-impl.el ends here