summaryrefslogtreecommitdiff
path: root/elisp/geiser.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-18 17:30:23 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-18 17:30:23 +0200
commit210bae902ad7450d1284e27672526a6d7f95ad94 (patch)
tree7d3dcf76e84f5e7abf6533edb83ab9111dcbdc67 /elisp/geiser.el
parent553ed51ad792d32215098fe0384f098314238b6b (diff)
downloadgeiser-chez-210bae902ad7450d1284e27672526a6d7f95ad94.tar.gz
geiser-chez-210bae902ad7450d1284e27672526a6d7f95ad94.tar.bz2
Will i ever get initialisation right?
Diffstat (limited to 'elisp/geiser.el')
-rw-r--r--elisp/geiser.el19
1 files changed, 3 insertions, 16 deletions
diff --git a/elisp/geiser.el b/elisp/geiser.el
index 42e8cc1..1cc3c51 100644
--- a/elisp/geiser.el
+++ b/elisp/geiser.el
@@ -90,18 +90,10 @@
geiser-xref))
-;;; Scheme mode setup:
+;;; Setup:
-(defsubst geiser-impl--impl-feature (impl)
- (intern (format "geiser-%s" impl)))
-
-(defun geiser-setup ()
- (eval-after-load "scheme"
- '(add-hook 'scheme-mode-hook 'turn-on-geiser-mode))
- (mapc (lambda (impl)
- (require (geiser-impl--impl-feature impl) nil t))
- (or geiser-impl-installed-implementations
- '(guile plt))))
+(eval-after-load "scheme"
+ '(add-hook 'scheme-mode-hook 'turn-on-geiser-mode))
;;; Reload:
@@ -166,10 +158,5 @@ loaded."
(message "Geiser reloaded!")))
-;; Initialization:
-
-(geiser-setup)
-
-
(provide 'geiser)
;;; geiser.el ends here