   (let ((m prog-mode-map))
     (define-key m [f6] 'recompile))
   ;; Show trailing whitespace.
-  (set (make-local-variable 'show-trailing-whitespace)
-       t))
-
+  (set (make-local-variable 'show-trailing-whitespace) t)
+  ;; Spellcheck comments and documentation
+  ;; From http://mwolson.org/projects/emacs-config/init.el.html
+  (flyspell-prog-mode)
+  (whitespace-mode)
+  (rainbow-delimiters-mode))
 (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 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))


(helm-mode 1)

(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))
