summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-09 22:00:20 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-02-09 22:00:20 +0100
commitcb1c7c38f4dbc5af1e4fed7cb9e01897a2cf458e (patch)
treefe4471d961754a0c31a6a105a4b7cd78f0efaf95
parentaacdd11a8816430e6bdd2704c52e07466f0cca19 (diff)
downloadgeiser-chez-cb1c7c38f4dbc5af1e4fed7cb9e01897a2cf458e.tar.gz
geiser-chez-cb1c7c38f4dbc5af1e4fed7cb9e01897a2cf458e.tar.bz2
GEISER-SETUP function activating geiser-mode in scheme files.
-rw-r--r--elisp/geiser.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/elisp/geiser.el b/elisp/geiser.el
index ab3e7ff..abf41d4 100644
--- a/elisp/geiser.el
+++ b/elisp/geiser.el
@@ -55,5 +55,15 @@
"Minor mode adding Geiser REPL interaction to Scheme buffers." t)
+;;; Scheme mode setup:
+
+(defun geiser-setup-scheme-mode ()
+ (eval-after-load "scheme"
+ '(add-hook 'scheme-mode-hook (lambda () (interactive) (geiser-mode 1)))))
+
+(defun geiser-setup ()
+ (geiser-setup-scheme-mode))
+
+
(provide 'geiser)
;;; geiser.el ends here