   (replace-regexp-in-string " " "-" (downcase title)))
 
 (defun ar/string-digits-p (string)
-  "Return t if STRING is an unsigned integer. nil otherwise."
+  "Return t if STRING is an unsigned integer.  nil otherwise."
   (if (string-match "\\`[[:digit:]]+\\'" string)
       t
     nil))

  (whitespace-mode)
  (rainbow-delimiters-mode)
  (hl-line-mode)
  (centered-cursor-mode)
  ;; Language-aware editing commands. Useful for imenu-menu.
  (semantic-mode 1)

  (let ((m org-mode-map))
    (define-key m [f6] #'ar/export-blog-to-html))
  (set (make-local-variable 'show-trailing-whitespace) t)
  (set (make-local-variable 'whitespace-line-column) 1000)
  (ar/org-src-color-blocks-dark)
  (flyspell-mode-on)
  (whitespace-mode)
  (rainbow-delimiters-mode)
