   ;; 100-column limit for java.
   (set-fill-column 100))
 
-(add-hook 'java-mode-hook 'ar/java-mode-hook-function)
+(add-hook 'java-mode-hook #'ar/java-mode-hook-function)
 
 (defun ar/prog-mode-hook-function ()
   "Called when entering all programming modes."
   (add-hook 'after-change-functions
-            'ar/after-prog-mode-text-change
+            #'ar/after-prog-mode-text-change
             t t)
   (let ((m prog-mode-map))
-    (define-key m [f6] 'recompile))
+    (define-key m [f6] #'recompile))
   ;; Show trailing whitespace.
   (set (make-local-variable 'show-trailing-whitespace) t)
   ;; Spellcheck comments and documentation

   ("p" git-gutter+-popup-hunk "pop hunk")
   ("q" nil "cancel")))

(defhydra hydra-smerge (:color red)
  "git smerge"
  ("n" smerge-next "next")

      whitespace-style '(face lines tabs))
(setq-default whitespace-mode 1)

(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
                         #'delete-window
                         (get-buffer-window buffer t)))
        (t
         (next-error)
         (message "Compilation exited abnormally: %s" string))))

;; Automatically hide successful builds window.
(setq compilation-finish-functions #'ar/compile-autoclose)

;; Automatically scroll build output.
(setq compilation-scroll-output t)

;; Prevent Extraneous Tabs.
;; From http://www.gnu.org/software/emacs/manual/html_node/eintr/Indent-Tabs-Mode.html
