 
   ;; Automatically hide successful builds window.
   ;; Trying out without for a little while.
-  (setq compilation-finish-functions (list #'ar/compile-autoclose #'ar/compile-cache-env))
+  (setq compilation-finish-functions (list #'ar/compile-cache-env #'ar/compile-autoclose))
 
   ;; http://ivanmalison.github.io/dotfiles/#colorizecompliationbuffers
   (defun ar/colorize-compilation-buffer ()

                                      default-directory))
        (compile command))))

  (defun ar/compile-cache-env (buffer string)
    (when (and (string-match "finished" string)
               (boundp 'ar/compile--command)

         prog-mode-map
         ("C-c C-c" . ar/compile))
  :config
  (defun ar/compile (prefix)
    (interactive "p")
    (if (and (eq prefix 1)
