                       (goto-char 1)
                       (forward-line (1- ξline-num)))
                   (progn
-                    (when (y-or-n-p (format "file doesn't exist: %s. Create?" ξfpath))
+                    (when (y-or-n-p (format "File doesn't exist: %s.  Create? " ξfpath))
                       (find-file ξfpath))))))
           (progn
             (if (file-exists-p ξpath)
                 (find-file ξpath)
               (if (file-exists-p (concat ξpath ".el"))
                   (find-file (concat ξpath ".el"))
-                (when (y-or-n-p (format "file doesn't exist: %s. Create?" ξpath))
+                (when (y-or-n-p (format "File doesn't exist: %s.  Create? " ξpath))
                   (find-file ξpath ))))))))))
 
 (use-package flycheck :ensure t)

(use-package rainbow-mode :ensure t)
(rainbow-mode 1)

;; Activate smerge on conflicts.
(defun sm-try-smerge ()
  (save-excursion
    (goto-char (point-min))
    (when (re-search-forward "^<<<<<<< " nil t)

(auto-compile-on-save-mode 1)

(defun ar/char-upcasep (letter)
  "Check if LETTER is uppercase."
  (eq letter (upcase letter)))

;;  http://oremacs.com/2014/12/25/ode-to-toggle
