diff options
Diffstat (limited to 'elisp/geiser-mode.el')
| -rw-r--r-- | elisp/geiser-mode.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index c8a9e0d..d5bfbfb 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -367,6 +367,7 @@ With prefix, try to enter the current buffer's module." (or geiser-mode-string (format " %s" (or (geiser-impl--impl-str) "G")))) +;;;###autoload (define-minor-mode geiser-mode "Toggle Geiser's mode. @@ -395,6 +396,7 @@ interacting with the Geiser REPL is at your disposal. (not (geiser-repl--connection*))) (save-window-excursion (geiser geiser-impl--implementation)))) +;;;###autoload (defun turn-on-geiser-mode () "Enable `geiser-mode' (in a Scheme buffer)." (interactive) @@ -405,10 +407,14 @@ interacting with the Geiser REPL is at your disposal. (interactive) (geiser-mode -1)) +;;;###autoload (defun geiser-mode--maybe-activate () (when (and geiser-mode-auto-p (eq major-mode 'scheme-mode)) (turn-on-geiser-mode))) +;;;###autoload +(add-hook 'scheme-mode-hook 'geiser-mode--maybe-activate) + ;;; Reload support: |