 (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-fg-s readable-mono-theme-light-foreground-secondary)
       (l-green-bg "#eeedcb")
       (l-green-bg-s "#d5d99d")
       (l-red-bg "#ffe1cb")

   `(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))))

   ;; Haskell-mode
   `(haskell-interactive-face-prompt ((t (:inherit readable-mono-theme-strong))))

      (d-bg readable-mono-theme-dark-background)
      (d-bg-s readable-mono-theme-dark-background-secondary)
      (d-fg readable-mono-theme-dark-foreground)
      (d-fg-s readable-mono-theme-dark-foreground-secondary)
      (d-green-bg "#1e3531")
      (d-green-bg-s "#354725")
      (d-red-bg "#2f2c31")
