summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2011-01-23 20:12:16 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2011-01-23 20:12:16 +0100
commitba3fb44c64eac29fd0b322fb811f1983eaacf796 (patch)
treeb6758bd2af27006402be4b756612f04d41777928
parent209110b1852fec5260e95deb9a47208c67927e2f (diff)
downloadgeiser-guile-ba3fb44c64eac29fd0b322fb811f1983eaacf796.tar.gz
geiser-guile-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.texi2
-rw-r--r--elisp/geiser-repl.el4
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)