From ba3fb44c64eac29fd0b322fb811f1983eaacf796 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 23 Jan 2011 20:12:16 +0100 Subject: 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. --- elisp/geiser-repl.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'elisp/geiser-repl.el') 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) -- cgit v1.2.3