summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-02-28 00:48:35 -0500
committerKyle Meyer <kyle@kyleam.com>2014-02-28 00:48:35 -0500
commitacec53f17580699f7d5c8548bc148e0c4719fd94 (patch)
tree21984d611e41d26f7c0cd35eb33ec5c0dc036932 /lisp
parent5bd59d52f6362b99147fe71904e88ee9fa8599c1 (diff)
downloademacs.d-acec53f17580699f7d5c8548bc148e0c4719fd94.tar.gz
Add more shell-related functions to external map
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-external.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/lisp/init-external.el b/lisp/init-external.el
index 06ce5d5..b9dc5f0 100644
--- a/lisp/init-external.el
+++ b/lisp/init-external.el
@@ -20,8 +20,22 @@ other window when an asynchronous command is run."
(define-prefix-command 'external-map)
(global-set-key (kbd "C-c x") 'external-map)
+(defun km/zsh-ansi-term ()
+ (interactive)
+ (ansi-term "/bin/zsh"))
+
+(define-key external-map "a" 'km/zsh-ansi-term)
+(define-key external-map "t" 'km/open-external-terminal)
+(define-key external-map "r" 'shell-command-on-region)
+(define-key external-map "s" 'shell-command)
+(define-key external-map "S" 'shell)
+
+(define-key external-map "a" 'km/zsh-ansi-term)
(define-key external-map "t" 'km/open-external-terminal)
+(define-key external-map "r" 'shell-command-on-region)
(define-key external-map "s" 'shell-command)
+(define-key external-map "S" 'shell)
+
(define-key external-map "c" 'compile)
(define-key external-map "g" 'recompile)