 (use-package rainbow-mode :ensure t)
 (rainbow-mode 1)
 
-;; Activate smerge on conflicts.
 (defun sm-try-smerge ()
+  "Activate smerge on conflicts."
   (save-excursion
     (goto-char (point-min))
     (when (re-search-forward "^<<<<<<< " nil t)

                      (goto-char 1)
                      (forward-line (1- ξline-num)))
                  (progn
                    (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))
                  (find-file ξpath ))))))))))

(use-package flycheck :ensure 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
