Emacs compilation buffer visibility (hide on success, keep in background, show on toggle)

compile-quietly-mode.el

(defvar compilation-buffer-visible nil)

(defun toggle-compilation-visible ()
  (interactive)
  (setq compilation-buffer-visible (not compilation-buffer-visible))
  (message "Compilation buffer %s"
           (if compilation-buffer-visible "visible" "not visible")))

(defun notify-compilation-result(buffer msg)
  (with-current-buffer buffer
    (progn
      (cond
       ((and (string-match "^finished" msg) (string= "*compilation*" (buffer-name)))
        (progn
          (unless compilation-buffer-visible (delete-windows-on buffer))
          ))
       ((string= "*compilation*" (buffer-name))
        (progn
          ;; you can add a custom message here, like (buffer-contents, but I like the default ones from
          ;; compilation-mode
          ;;
          ;; (message "Compilation failed: %s" (buffer-substring () ()))
          ))
       )
      (setq current-frame (car (car (cdr (current-frame-configuration)))))
      (raise-frame current-frame))))

(add-to-list 'compilation-finish-functions 'notify-compilation-result)

(defun recompile-quietly ()
  "Re-compile without changing the window configuration."
  (interactive)
  (save-window-excursion
    (projectile-compile-project nil)))

(evil-leader/set-key
  "c"       'projectile-compile-project
  "l"       'recompile-quietly)