diff --git a/emacs/init.el b/emacs/init.el
index 5a0c64c..f57e9cd 100644
--- a/emacs/init.el
+++ b/emacs/init.el
@@ -4,6 +4,36 @@
 (package-initialize)
 (package-refresh-contents)
 
+(defvar my-packages '(
+		      ; TODO
+		      lispy
+
+					; TODO
+		      smartparens
+
+					; TODO
+		      which-key
+
+					; TODO
+		      git-gutter
+
+		      rainbow-delimiters
+
+		      auto-complete-distel
+
+		      auto-complete
+
+		      evil
+
+		      magit
+
+		      evil-magit
+		      ))
+
+(dolist (p my-packages)
+  (when (not (package-installed-p p))
+    (package-install p)))
+
 (custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
@@ -11,7 +41,7 @@
  ;; If there is more than one, they won't work right.
  '(package-selected-packages
    (quote
-    (lispy smartparens which-key git-gutter rainbow-delimiters auto-complete-distel auto-complete evil magit evil-magit))))
+    (lispy smartparens which-key git-gutter rainbow-delimiters auto-complete-distel auto-complete evil magit evil-magit)) t))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
@@ -28,7 +58,7 @@
 (define-key evil-normal-state-map (kbd "C-k") 'evil-scroll-up)
 (define-key evil-normal-state-map (kbd "C-j") 'evil-scroll-down)
 (evil-mode 1)
-; (require 'evil-magit)
+(require 'evil-magit)
 
 ;; Rainbow Delims
 (add-hook 'prog-mode-hook #'rainbow-delimiters-mode)
@@ -47,21 +77,21 @@
 ;; (define-key evil-normal-state-map (kbd "C-\\") 'cider-eval-defun-up-to-point)
 
 ;; Extra things
-(global-whitespace-mode 1)
+; (global-whitespace-mode 1)
 
-(progn
+; (progn
   ;; Make whitespace-mode with very basic background coloring for whitespaces.
   ;; http://ergoemacs.org/emacs/whitespace-mode.html
-  (setq whitespace-style (quote (face spaces tabs newline space-mark tab-mark newline-mark )))
+  ; (setq whitespace-style (quote (face spaces tabs newline space-mark tab-mark newline-mark )))
 
   ;; Make whitespace-mode and whitespace-newline-mode use “¶” for end of line char and “▷” for tab.
-  (setq whitespace-display-mappings
+  ; (setq whitespace-display-mappings
 	;; all numbers are unicode codepoint in decimal. e.g. (insert-char 182 1)
-	(quote (
-	  (space-mark 32 [183] [46]) ; SPACE 32 「 」, 183 MIDDLE DOT 「·」, 46 FULL STOP 「.」
-	  (newline-mark 10 [182 10]) ; LINE FEED,
-	  (tab-mark 9 [8614])	     ; tab
-	  )
-	)
-  )
-)
+	; (quote (
+	  ; (space-mark 32 [183] [46]) ; SPACE 32 「 」, 183 MIDDLE DOT 「·」, 46 FULL STOP 「.」
+	  ; (newline-mark 10 [182 10]) ; LINE FEED,
+	  ; (tab-mark 9 [8614])	     ; tab
+	  ; )
+	; )
+  ; )
+; )