diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2011-01-23 20:12:16 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2011-01-23 20:12:16 +0100 |
| commit | ba3fb44c64eac29fd0b322fb811f1983eaacf796 (patch) | |
| tree | b6758bd2af27006402be4b756612f04d41777928 | |
| parent | 209110b1852fec5260e95deb9a47208c67927e2f (diff) | |
| download | geiser-chez-ba3fb44c64eac29fd0b322fb811f1983eaacf796.tar.gz geiser-chez-ba3fb44c64eac29fd0b322fb811f1983eaacf796.tar.bz2 | |
geiser-repl--tab -> geiser-repl-tab-dwim
Following a suggestion by M. Harig, and following the policy that it's
better for command names to not be doubly hyphenated.
| -rw-r--r-- | doc/cheat.texi | 2 | ||||
| -rw-r--r-- | elisp/geiser-repl.el | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/doc/cheat.texi b/doc/cheat.texi index 4c21450..a0ac413 100644 --- a/doc/cheat.texi +++ b/doc/cheat.texi @@ -122,7 +122,7 @@ third key not modified by @key{Control}; e.g., @tab @code{geiser-edit-symbol-at-point} @tab Edit identifier at point @item TAB -@tab @code{geiser-repl--tab} +@tab @code{geiser-repl-tab-dwim} @tab Complete, indent, or go to next error @item S-TAB (backtab) @tab @code{geiser-repl--previous-error} diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 5927e3d..54da070 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -473,7 +473,7 @@ module command as a string") (geiser-repl--newline-and-indent) (insert "\n")))))) -(defun geiser-repl--tab (n) +(defun geiser-repl-tab-dwim (n) "If we're after the last prompt, complete symbol or indent (if there's no symbol at point). Otherwise, go to next error in the REPL buffer." @@ -511,7 +511,7 @@ buffer." (define-key geiser-repl-mode-map "\C-m" 'geiser-repl--maybe-send) (define-key geiser-repl-mode-map [return] 'geiser-repl--maybe-send) (define-key geiser-repl-mode-map "\C-j" 'geiser-repl--newline-and-indent) -(define-key geiser-repl-mode-map (kbd "TAB") 'geiser-repl--tab) +(define-key geiser-repl-mode-map (kbd "TAB") 'geiser-repl-tab-dwim) (define-key geiser-repl-mode-map [backtab] 'geiser-repl--previous-error) (define-key geiser-repl-mode-map "\C-a" 'geiser-repl--bol) |