                 (let ((mark-even-if-inactive transient-mark-mode))
                   (indent-region (region-beginning) (region-end) nil))))))
 
-(global-set-key (kbd "C-x C-r") 'eval-region)
+(global-set-key (kbd "C-x C-r") #'eval-region)
 
 ;;  From http://oremacs.com/2015/01/05/youtube-dl
 (defun ar/youtube-dowload ()

    (global-linum-mode t)
    (ar/setup-git-fringe)
    (add-hook 'before-make-frame-hook
              #'(lambda ()
                  (use-package hlinum :ensure t)
                  (hlinum-activate)
                  (ar/setup-git-fringe)))))

(ar/setup-graphic-display)


      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
