 ;; Automatically hide successful builds window.
 (setq compilation-finish-functions 'ar/compile-autoclose)
 (defun ar/compile-autoclose (buffer string)
+  "Hide successful builds window with BUFFER and STRING."
   (cond ((string-match "finished" string)
          (message "Build finished")
          (run-with-timer 2 nil

(use-package centered-cursor-mode :ensure t)

(defun ar/create-non-existent-directory ()
  (let ((parent-directory (file-name-directory buffer-file-name)))
    (when (and (not (file-exists-p parent-directory))
               (y-or-n-p (format "Directory `%s' does not exist! Create it? " parent-directory)))

(auto-compile-on-save-mode 1)

(defun ar/char-upcasep (letter)
  "Check if LETTER is uppercase."
  (eq letter (upcase letter)))

;;  http://oremacs.com/2014/12/25/ode-to-toggle
