From c1ce389ea00d1bf61e98e8c5a05888af3e8f8257 Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Wed, 1 Jun 2016 11:36:36 -0700
Subject: [PATCH] Tweaks

---
 dotfiles/emacs.d/init.el | 55 ++++++++++------------------------------
 1 file changed, 14 insertions(+), 41 deletions(-)

diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el
index f9384c48..30c7c046 100644
--- a/dotfiles/emacs.d/init.el
+++ b/dotfiles/emacs.d/init.el
@@ -617,52 +617,25 @@ buffer is not visiting a file."
     (unbind-key "C-<backspace>" smartparens-mode-map)
     (unbind-key "M-<backspace>" smartparens-mode-map)))
 
-(defclass indexed-mapping ()
-  ((mapping :initarg :mapping :initform nil)
-   (index :initarg :index :initform nil)))
-
-(defmethod im-get ((im indexed-mapping) key)
-  (plist-get (oref im :mapping) key))
-
-(defmethod im-index-get ((im indexed-mapping) value)
-  (plist-get (oref im :index) value))
-
-(defmethod im-index-get-one ((im indexed-mapping) value)
-  (let ((keys (plist-get (oref im :index) value)))
-    (when keys (car keys))))
-
-(defmethod im-put ((im indexed-mapping) key value)
-  ;; Handle removing the key from where it is currently indexed
-  (im-unindex im key)
-  ;; Add the key to its new position in the index
-  (oset im :index
-        (plist-put (oref im :index)
-                   value (cons key (plist-get (oref im :index) value))))
-  ;; Add the key, value pair to the mapping
-  (oset im :mapping
-        (plist-put (oref im :mapping) key value)))
-
-(defmethod im-unindex ((im indexed-mapping) key)
-  (let* ((current-value (plist-get (oref im :mapping) key))
-         (value-list (plist-get (oref im :index) current-value)))
-    (when value-list
-      (setq value-list (remove key value-list))
-      (oset im :index
-            (plist-put (oref im :index)
-                       current-value value-list)))))
-
-(defmethod im-delete ((im indexed-mapping) key)
-  (im-unindex im key)
-  (oset im :mapping
-        (use-package-plist-delete (oref im :mapping) key)))
-
 (use-package term-manager
   :ensure nil
-  :load-path "~/Projects/term-manager")
+  :load-path "~/Projects/term-manager"
+  :preface
+  (progn
+    (defun imalison:set-escape-char (&rest args)
+      (let (term-escape-char)
+       (term-set-escape-char ?\C-x))))
+  :config
+  (progn
+    (advice-add
+     'term-manager-default-build-term :after 'imalison:set-escape-char)))
 
 (use-package term-projectile
   :ensure nil
-  :load-path "~/Projects/term-manager")
+  :load-path "~/Projects/term-manager"
+  :config
+  (progn
+    ))
 
 (use-package term
   :preface