X-Git-Url: https://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=mode-hooks%2Fmulti-term-hooks.el;fp=mode-hooks%2Fmulti-term-hooks.el;h=9b4f9637e30189923fe9b7284b3eda26f0de53b1;hb=fbbc9a15a09aedbff1d018cd53f7f119d3da8fc4;hp=0000000000000000000000000000000000000000;hpb=a57cb7f84a91da0cf8dff834ee8295560104a177;p=emacs.d.git

diff --git a/mode-hooks/multi-term-hooks.el b/mode-hooks/multi-term-hooks.el
new file mode 100644
index 0000000..9b4f963
--- /dev/null
+++ b/mode-hooks/multi-term-hooks.el
@@ -0,0 +1,11 @@
+(defun mtm-hook()
+  ;; Pass through C-c, C-x, and M-x for emaception.
+  (delete "C-x" term-unbind-key-list)
+  (delete "C-c"   term-unbind-key-list)
+  (delete "<ESC>" term-unbind-key-list)
+
+  ;; We don't need the special C-c C-c any afterwards.
+  (delete '("C-c C-c" . term-interrupt-subjob) term-bind-key-alist)
+)
+
+(add-hook 'term-mode-hook (function mtm-hook))