 
 (helm-mode 1)
 
-(defun helm-do-grep-recursive (&optional non-recursive)
+(defun ar/helm-do-grep-recursive (&optional non-recursive)
   "Like `helm-do-grep', but greps recursively by default."
   (interactive "P")
   (let* ((current-prefix-arg (not non-recursive))

  (let ((m prog-mode-map))
    (define-key m [f6] 'recompile))
  ;; Show trailing whitespace.
  (set (make-local-variable 'show-trailing-whitespace)
       t))

(add-hook 'prog-mode-hook 'ar/prog-mode-hook)

(use-package centered-cursor-mode


;; Move buffer file.
;; From: https://sites.google.com/site/steveyegge2/my-dot-emacs-file
(defun ar/move-buffer-file (dir)
  "Moves both current buffer and file it's visiting to DIR." (interactive "DNew directory: ")
  (let* ((name (buffer-name))
         (filename (buffer-file-name))
