diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-03-11 04:14:20 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-03-11 04:14:20 +0100 |
| commit | 4a3709eceb8431f514ac5b0aa3046c051ad2e41f (patch) | |
| tree | 31100faf7ed94a0b2e3d08e684afe403d67c919e /elisp | |
| parent | 76298abf66bfd4d954640db17ea4579356143510 (diff) | |
| download | geiser-4a3709eceb8431f514ac5b0aa3046c051ad2e41f.tar.gz geiser-4a3709eceb8431f514ac5b0aa3046c051ad2e41f.tar.bz2 | |
Better (at least in US keyboards) default key (M-`) for module name completion.
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser-mode.el | 1 | ||||
| -rw-r--r-- | elisp/geiser-repl.el | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index 4f6a584..cf43e00 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -182,6 +182,7 @@ interacting with the Geiser REPL is at your disposal. (define-key geiser-mode-map "\C-c\C-k" 'geiser-compile-current-buffer) (define-key geiser-mode-map (kbd "M-TAB") 'geiser-completion--complete-symbol) +(define-key geiser-mode-map (kbd "M-`") 'geiser-completion--complete-module) (define-key geiser-mode-map (kbd "C-.") 'geiser-completion--complete-module) (define-key geiser-mode-map "\M-." 'geiser-edit-symbol-at-point) (define-key geiser-mode-map "\M-," 'geiser-edit-pop-edit-symbol-stack) diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 2f472f3..5a9a9fb 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -269,6 +269,7 @@ If no REPL is running, execute `run-geiser' to start a fresh one." (define-key geiser-repl-mode-map (kbd "TAB") 'geiser-completion--complete-symbol) (define-key geiser-repl-mode-map (kbd "M-TAB") 'geiser-completion--complete-symbol) +(define-key geiser-repl-mode-map (kbd "M-`") 'geiser-completion--complete-module) (define-key geiser-repl-mode-map (kbd "C-.") 'geiser-completion--complete-module) (define-key geiser-repl-mode-map "\M-." 'geiser-edit-symbol-at-point) (define-key geiser-repl-mode-map "\M-," 'geiser-edit-pop-edit-symbol-stack) |