    `(sml/vc ((t (:foreground ,peter-river :weight bold))))
    `(sml/vc-edited ((t (:foreground ,pumpkin :weight bold))))
    `(sml/git ((t (:foreground ,peter-river :weight bold))))
-;;;;; SLIME
+   ;; SLIME
    `(slime-repl-output-face ((t (:foreground ,midnight-blue))))
    `(slime-repl-inputed-output-face ((t (:foreground ,wet-asphalt))))
    `(slime-error-face

   `(font-lock-warning-face ((t (:foreground ,pumpkin :weight bold))))

   `(c-annotation-face ((t (:inherit font-lock-constant-face))))
;;;;; ledger
   `(ledger-font-directive-face ((t (:foreground ,nephritis))))
   `(ledger-font-periodic-xact-face ((t (:inherit ledger-font-directive-face))))
   `(ledger-occur-xact-face ((t (:background ,silver))))
;;;; Third-party
;;;;; ace-jump
   `(ace-jump-face-background
     ((t (:foreground ,concrete :background ,clouds :inverse-video nil))))
   `(ace-jump-face-foreground
     ((t (:foreground ,alizarin :background ,clouds :inverse-video nil))))
;;;;; anzu
   `(anzu-mode-line ((t (:foreground ,turquoise :weight bold))))
;;;;; auto-complete
   `(ac-candidate-face ((t (:background ,concrete :foreground ,midnight-blue))))
   `(ac-selection-face ((t (:background ,asbestos :foreground ,midnight-blue))))
   `(popup-tip-face ((t (:background ,sun-flower :foreground ,midnight-blue))))
   `(popup-scroll-bar-foreground-face ((t (:background ,asbestos))))
   `(popup-scroll-bar-background-face ((t (:background ,silver))))
   `(popup-isearch-match ((t (:background ,clouds :foreground ,midnight-blue))))
;;;;; TODO: bm
   ;; `(bm-face ((t (:background ,zenburn-yellow-1 :foreground ,zenburn-bg))))
   ;; `(bm-fringe-face ((t (:background ,zenburn-yellow-1 :foreground ,zenburn-bg))))
   ;; `(bm-fringe-persistent-face ((t (:background ,zenburn-green-1 :foreground ,zenburn-bg))))
   ;; `(bm-persistent-face ((t (:background ,zenburn-green-1 :foreground ,zenburn-bg))))
;;;;; clojure-test-mode
   `(clojure-test-failure-face ((t (:foreground ,carrot :weight bold :underline t))))
   `(clojure-test-error-face ((t (:foreground ,alizarin :weight bold :underline t))))
   `(clojure-test-success-face ((t (:foreground ,emerald :weight bold :underline t))))
;;;;; diff
   `(diff-added ((,class (:foreground ,nephritis :background ,clouds))
                 (t (:foreground ,nephritis :background ,clouds))))
   `(diff-changed ((t (:foreground ,carrot))))

       (:underline (:style wave :color ,wisteria)
                   :inherit unspecified :foreground unspecified :background unspecified))
      (t (:foreground ,wisteria :weight bold :underline t))))
   ;; flyspell
   `(flyspell-duplicate
     ((((supports :underline (:style wave)))
       (:underline (:style wave :color ,orange) :inherit unspecified))
