--- /dev/null
+(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))