diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-15 18:41:04 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-15 18:41:04 +0100 |
| commit | bc1b0658370808d53cfd4e485911802bc498f626 (patch) | |
| tree | 2075ed58692e5b8653704f1ee1b24262e1b77d09 /elisp/geiser-mode.el | |
| parent | 245e681f8ebd0f9304ae87815bf1d49a05241162 (diff) | |
| download | geiser-guile-bc1b0658370808d53cfd4e485911802bc498f626.tar.gz geiser-guile-bc1b0658370808d53cfd4e485911802bc498f626.tar.bz2 | |
Smart tab completion mode.
Diffstat (limited to 'elisp/geiser-mode.el')
| -rw-r--r-- | elisp/geiser-mode.el | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index d58de1e..84455e7 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -43,11 +43,16 @@ :group 'geiser) (defcustom geiser-mode-autodoc-p t - "Whether `geiser-autodoc-mode' gets enabled by default in factor buffers." + "Whether `geiser-autodoc-mode' gets enabled by default in Scheme buffers." :group 'geiser-mode :group 'geiser-autodoc :type 'boolean) +(defcustom geiser-mode-smart-tab-p t + "Whether `geiser-smart-tab-mode' gets enabled by default in Scheme buffers." + :group 'geiser-mode + :type 'boolean) + ;;; Auxiliary functions: @@ -132,10 +137,12 @@ interacting with the Geiser REPL is at your disposal. \\{geiser-mode-map}" :init-value nil :lighter geiser-mode-string - :group 'geiser + :group 'geiser-mode :keymap geiser-mode-map (setq geiser-autodoc-mode-string "/A") - (when geiser-mode-autodoc-p (geiser-autodoc-mode geiser-mode))) + (setq geiser-smart-tab-mode-string "/T") + (when geiser-mode-autodoc-p (geiser-autodoc-mode geiser-mode)) + (when geiser-mode-smart-tab-p (geiser-smart-tab-mode geiser-mode))) ;;; Keys: |