diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-09 22:00:20 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-09 22:00:20 +0100 |
| commit | 72044e719d28ff89c77e0513e7b9e5d760b45d5e (patch) | |
| tree | 3d3598a1c227f2a583ea2a2c89c60ff8364c4892 /elisp | |
| parent | 4e16a7a00ffdc62d46143f614055d7aaf191ad9e (diff) | |
| download | geiser-72044e719d28ff89c77e0513e7b9e5d760b45d5e.tar.gz geiser-72044e719d28ff89c77e0513e7b9e5d760b45d5e.tar.bz2 | |
GEISER-SETUP function activating geiser-mode in scheme files.
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser.el | 10 |
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 |