    `(eshell-ls-product ((t (:inherit font-lock-doc-face))))
    `(eshell-ls-special ((t (:inherit readable-mono-theme-strong))))
    `(eshell-ls-symlink ((t (:inherit readable-mono-theme-strong))))
+
+   ;; Flyspell
+   `(flyspell-duplicate
+     ((((background light)) (:underline (:style wave :color ,l-fg-s)))
+      (((background dark)) (:underline (:style wave :color ,d-fg-s)))))
+   `(flyspell-incorrect
+     ((((background light)) (:underline (:style wave :color ,l-fg)))
+      (((background dark)) (:underline (:style wave :color ,d-fg)))))
 
    ;; Haskell-mode
    `(haskell-interactive-face-prompt ((t (:inherit readable-mono-theme-strong))))

(let ((l-bg readable-mono-theme-light-background)
      (l-bg-s readable-mono-theme-light-background-secondary)
      (l-fg readable-mono-theme-light-foreground)
      (l-green-bg "#eeedcb")
      (l-green-bg-s "#d5d99d")
      (l-red-bg "#ffe1cb")

;; - company-tooltip-selection
;; - company-tooltip
;; - hl-todo
;; - ert-test-result-unexpected
;; - ert-test-result-expected

