   "Toggle read status of message(s) from BEG to END."
   (interactive (notmuch-search-interactive-region))
   (if (member "spam" (notmuch-search-get-tags))
-    (progn
-      (notmuch-search-tag '("+inbox") beg end)
-      (notmuch-search-tag '("-spam") beg end))
+      (progn
+        (notmuch-search-tag '("+inbox") beg end)
+        (notmuch-search-tag '("-spam") beg end))
     (progn
       (notmuch-search-tag '("+spam") beg end)
       (notmuch-search-tag '("-unread") beg end)

;; fix emoji support in cocoa-mode
;; https://github.com/dunn/company-emoji/issues/2#issue-99494790
(defun --set-emoji-font (frame)
"Adjust the font settings of FRAME so Emacs NS/Cocoa can display emoji properly."
  (if (eq system-type 'darwin)
    (set-fontset-font t 'symbol (font-spec :family "Apple Color Emoji") frame 'prepend)
    (set-fontset-font t 'symbol (font-spec :family "Symbola") frame 'prepend)))
;; For when emacs is started with Emacs.app
(--set-emoji-font nil)

;;
(require-package 'exec-path-from-shell)
(if (equal "winter" (exec-path-from-shell-getenv "SEASON"))
    (setq frame-background-mode 'dark)
  (setq frame-background-mode 'light))
;; `t` is important: http://stackoverflow.com/a/8547861
(load-theme 'solarized t)
