From c6d71e328150d22886ec4109a5f4f7af172c130f Mon Sep 17 00:00:00 2001
From: Ivan Malison <IvanMalison@gmail.com>
Date: Fri, 12 Dec 2014 04:34:07 -0800
Subject: [PATCH] tweaks.

---
 init.el | 34 +++++++++++++++++++++++++++++-----
 1 file changed, 29 insertions(+), 5 deletions(-)

diff --git a/init.el b/init.el
index 38e25af6..43fa2a41 100644
--- a/init.el
+++ b/init.el
@@ -406,11 +406,12 @@ The current directory is assumed to be the project's root otherwise."
 
 (use-package ace-isearch
   :ensure t
+  :disabled t ;; I just don't really use this much
   :config
   (progn
     (global-ace-isearch-mode +1)
     (setq ace-isearch-use-function-from-isearch nil)
-    (setq ace-isearch-input-idle-delay .25)))
+    (setq ace-isearch-input-idle-delay 1)))
 
 (use-package flycheck
   :ensure t
@@ -436,6 +437,8 @@ The current directory is assumed to be the project's root otherwise."
   (progn
     (add-hook 'prog-mode-hook (lambda () (rainbow-delimiters-mode t)))))
 
+(use-package diff-hl :ensure t)
+
 (use-package magit
   :ensure t
   :commands magit-status
@@ -462,8 +465,13 @@ The current directory is assumed to be the project's root otherwise."
 (use-package company
   :ensure t
   :commands company-mode
-  :config
-  (diminish 'company-mode)
+  :bind (("C-\\" . company-complete))
+  :config 
+  (progn
+    (setq company-idle-delay .25)
+    (global-company-mode)
+    (add-to-list 'company-backends 'mu4e-contacts-company)
+    (diminish 'company-mode))
   :init
   (add-hook 'prog-mode-hook (lambda () (company-mode t))))
 
@@ -750,6 +758,20 @@ The current directory is assumed to be the project's root otherwise."
     ;; show images
     (setq mu4e-show-images t)
 
+    (defun imalison:mu4e-startup ()
+      (let ((buffer-existed (get-buffer mu4e~main-buffer-name))
+            (inhibit-read-only t)
+            (buffer (get-buffer-create mu4e~main-buffer-name)))
+        (switch-to-buffer buffer)
+        (mu4e-main-mode)
+        (unless buffer-existed
+          (insert (format "mu4e: --- %s" (documentation major-mode))))))
+
+    ;; Don't use the default mu4e start screen
+    (defun mu4e ()
+      (interactive)
+      (mu4e~start 'imalison:mu4e-startup))
+
     ;; use imagemagick, if available
     (when (fboundp 'imagemagick-register-types)
          (imagemagick-register-types))
@@ -974,6 +996,7 @@ The current directory is assumed to be the project's root otherwise."
   :commands ido-mode
   :config
   (progn
+    (setq ido-create-new-buffer 'always)
     (ido-everywhere 1)
     (setq ido-enable-flex-matching t)
     (use-package flx :ensure t)
@@ -994,8 +1017,7 @@ The current directory is assumed to be the project's root otherwise."
     (use-package ido-vertical-mode
       :ensure t
       :config (ido-vertical-mode 1))
-    (use-package flx-ido :ensure t)
-    (ido-ubiquitous-mode 1)))
+    (use-package flx-ido :ensure t)))
 
 (if (and (boundp 'use-ido) use-ido) (ido-mode))
 
@@ -1005,6 +1027,8 @@ The current directory is assumed to be the project's root otherwise."
 
 (setq edebug-trace t)
 
+(use-package macrostep :ensure t)
+
 (use-package paredit
   :ensure t)