diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-06-20 09:56:59 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-06-20 09:56:59 +0200 |
commit | 54bcf1930401e3fca5e132914923efa6fe4e4b3d (patch) | |
tree | bcce4000627a90ab71cb25de364e17cf7c546b77 | |
parent | ed141a327f13d61f21b4d57bffe4f6c27e5ab93f (diff) | |
download | geiser-guile-54bcf1930401e3fca5e132914923efa6fe4e4b3d.tar.gz geiser-guile-54bcf1930401e3fca5e132914923efa6fe4e4b3d.tar.bz2 |
Auxiliary function.
-rw-r--r-- | elisp/geiser-impl.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/elisp/geiser-impl.el b/elisp/geiser-impl.el index 4239f1e..cb5daa8 100644 --- a/elisp/geiser-impl.el +++ b/elisp/geiser-impl.el @@ -71,6 +71,9 @@ determine its scheme flavour." (setq geiser-impl--impls (remove impl geiser-impl--impls)) (ignore-errors (unload-feature (geiser-impl--impl-feature impl)))) +(defun geiser-impl--add-to-alist (kind what impl) + (add-to-list 'geiser-impl-implementations-alist (list (list kind what) impl))) + (defvar geiser-impl--default-implementation geiser-impl-default-implementation) |