diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 10:47:12 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 10:47:12 +0100 |
commit | 6f70f872937cd0e9fc3009c9e1afe88efa1faea4 (patch) | |
tree | 9cebdd0c51f7fdf2d44f65e9fc59a698bb0e0dfb /elisp/geiser-mode.el | |
parent | 5b5234f47ce59f577867fd55b8d8f0acf64a6911 (diff) | |
download | geiser-6f70f872937cd0e9fc3009c9e1afe88efa1faea4.tar.gz geiser-6f70f872937cd0e9fc3009c9e1afe88efa1faea4.tar.bz2 |
Load file commands.
Diffstat (limited to 'elisp/geiser-mode.el')
-rw-r--r-- | elisp/geiser-mode.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index 18accb4..f5798e5 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -137,21 +137,25 @@ interacting with the Geiser REPL is at your disposal. ;;; Keys: +(define-key geiser-mode-map "\C-c\C-z" 'switch-to-guile) +(define-key geiser-mode-map "\C-c\C-l" 'geiser-load-current-buffer) +(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 "\M-\C-x" 'geiser-send-definition) -(define-key geiser-mode-map "\C-c\C-a" 'geiser-autodoc-mode) (define-key geiser-mode-map "\C-x\C-e" 'geiser-send-last-sexp) (define-key geiser-mode-map "\C-c\C-e" 'geiser-send-definition) (define-key geiser-mode-map "\C-c\M-e" 'geiser-send-definition-and-go) (define-key geiser-mode-map "\C-c\C-r" 'geiser-send-region) (define-key geiser-mode-map "\C-c\M-r" 'geiser-send-region-and-go) + +(define-key geiser-mode-map "\C-c\C-a" 'geiser-autodoc-mode) + (define-key geiser-mode-map "\C-c\M-c" 'geiser-compile-definition) (define-key geiser-mode-map "\C-c\C-c" 'geiser-compile-definition-and-go) (define-key geiser-mode-map "\C-c\C-t" 'geiser-trace-procedure) (define-key geiser-mode-map "\C-c\C-x" 'geiser-expand-current-form) -(define-key geiser-mode-map "\C-c\C-z" 'switch-to-guile) -(define-key geiser-mode-map "\C-c\C-l" 'geiser-load-file) -(define-key geiser-mode-map "\C-c\C-k" 'geiser-compile-current-buffer) (provide 'geiser-mode) |