From caf962e8deffd840c67ef591613125638ff03d97 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sat, 23 Oct 2010 16:12:02 +0200 Subject: Using smart tab mode in REPL --- doc/fun.texi | 3 ++- elisp/geiser-guile.el | 4 ++-- elisp/geiser-repl.el | 1 + 3 files changed, 5 insertions(+), 3 deletions(-) diff --git a/doc/fun.texi b/doc/fun.texi index 2d3c263..76301e2 100644 --- a/doc/fun.texi +++ b/doc/fun.texi @@ -51,7 +51,8 @@ can stop reading now and, instead, discover Geiser's joys by yourself. I've tried to make Geiser as self-documenting as any self-respecting Emacs package should be. If you follow this route, make sure to take a look at Geiser's customization buffers (@kbd{M-x customize-group -@key{RET} geiser}): there's lot of fine tunning available there. +@key{RET} geiser}): there's lot of fine tunning available there. You +might also want to take a glance at the @ref{Cheat sheet}. Since @i{geiser-mode} is a minor mode, you can toggle it with @kbd{M-x geiser-mode}, and control its activation in hooks with the diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el index d788edd..e6cf8f1 100644 --- a/elisp/geiser-guile.el +++ b/elisp/geiser-guile.el @@ -132,8 +132,8 @@ This function uses `geiser-guile-init-file' if it exists." :f))) ((listp module) module) ((stringp module) - (or (ignore-errors - (car (geiser-syntax--read-from-string module))) :f)) + (or (ignore-errors (car (geiser-syntax--read-from-string module))) + :f)) (t :f))) (defun geiser-guile--module-cmd (module fmt &optional def) diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 7c9bd56..d55207e 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -514,6 +514,7 @@ With a prefix argument, force exit by killing the scheme process." (setq geiser-autodoc--inhibit-function 'geiser-con--is-debugging) (geiser-company--setup geiser-repl-company-p) (setq geiser-smart-tab-mode-string "") + (geiser-smart-tab-mode t) ;; enabling compilation-shell-minor-mode without the annoying highlighter (compilation-setup t)) -- cgit v1.2.3