diff options
author | Kyle Meyer <kyle@kyleam.com> | 2014-09-11 00:27:59 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2014-09-11 00:27:59 -0400 |
commit | 75cdf9ca439508c0728fa2e43698db7395d0d1f7 (patch) | |
tree | e7c8a346563aa78fae1a0d9e9713b28dcdb43d56 | |
parent | d99fbff01ed7bc92e92f23f224885bb9ce7ea7f6 (diff) | |
download | emacs.d-75cdf9ca439508c0728fa2e43698db7395d0d1f7.tar.gz |
Give compile commands their own prefix map
-rw-r--r-- | lisp/init-external.el | 11 | ||||
-rw-r--r-- | lisp/init-snakemake.el | 2 |
2 files changed, 7 insertions, 6 deletions
diff --git a/lisp/init-external.el b/lisp/init-external.el index ea33efd..dbf1862 100644 --- a/lisp/init-external.el +++ b/lisp/init-external.el @@ -68,11 +68,12 @@ monitor setup)." (display-buffer comp-buffer) (user-error "No compilation buffer"))) -(define-key km/external-map "c" 'compile) -(define-key km/external-map "g" 'recompile) -(define-key km/external-map "o" 'km/display-compilation-other-window) -;; Give frequently-used recompile a shorter binding. -(global-set-key (kbd "C-c g") 'recompile) +(define-prefix-command 'km/compile-map) +(global-set-key (kbd "C-c c") 'km/compile-map) + +(define-key km/compile-map "c" 'compile) +(define-key km/compile-map "g" 'recompile) +(define-key km/compile-map "o" 'km/display-compilation-other-window) ;;; Diff diff --git a/lisp/init-snakemake.el b/lisp/init-snakemake.el index 1694dea..65230de 100644 --- a/lisp/init-snakemake.el +++ b/lisp/init-snakemake.el @@ -22,7 +22,7 @@ (autoload 'snakemake-compile-command "snakemake-mode") (after 'init-external - (define-key km/external-map "p" + (define-key km/compile-map "p" 'km/snakemake-compile-project-file-at-point)) (provide 'init-snakemake) |