branch: elpa/moe-theme
commit 999c377b0bf91eca3cce72b85c10116d712222e5
Author: kuanyui <[email protected]>
Commit: kuanyui <[email protected]>

    Add Haskell interactive.
---
 moe-dark-theme.el  | 7 +++++++
 moe-light-theme.el | 8 ++++++++
 2 files changed, 15 insertions(+)

diff --git a/moe-dark-theme.el b/moe-dark-theme.el
index 5e3a56a22e..aeb1c811a9 100644
--- a/moe-dark-theme.el
+++ b/moe-dark-theme.el
@@ -741,6 +741,13 @@ Moe, moe, kyun!")
    `(cperl-hash-face ((,class (:foreground ,orange-0 :background ,red-4))))
    `(cperl-nonoverridable-face ((,class (:foreground ,green-01 :background 
,green-5))))
 
+   ;; Haskell
+   `(haskell-interactive-face-compile-error ((,class (:foreground ,red-3 
:background ,red-00 :bold t))))
+   `(haskell-interactive-face-compile-warning ((,class (:foreground ,orange-4 
:background ,orange-00 :bold t))))
+   `(haskell-interactive-face-garbage ((,class (:foreground ,black-2))))
+   `(haskell-interactive-face-prompt ((,class (:foreground ,green-01 
:background ,black-2-5 :bold t))))
+   `(haskell-interactive-face-result ((,class (:foreground ,blue-1))))
+
    ;; Custom
    `(custom-button ((,class (:background ,blue-0 :foreground ,blue-3
                                         :box (:line-width 1 :style 
released-button)))))
diff --git a/moe-light-theme.el b/moe-light-theme.el
index ef066725a8..70cbaac684 100644
--- a/moe-light-theme.el
+++ b/moe-light-theme.el
@@ -746,6 +746,14 @@ Moe, moe, kyun!")
    `(cperl-hash-face ((,class (:foreground ,orange-3 :background 
,orange-000))))
    `(cperl-nonoverridable-face ((,class (:foreground ,green-3 :background 
,green-00))))
 
+   ;; Haskell
+   `(haskell-interactive-face-compile-error ((,class (:foreground ,red-3 
:background ,red-00 :bold t))))
+   `(haskell-interactive-face-compile-warning ((,class (:foreground ,orange-4 
:background ,orange-00 :bold t))))
+   `(haskell-interactive-face-garbage ((,class (:foreground ,black-2))))
+   `(haskell-interactive-face-prompt ((,class (:foreground ,black-4 
:background ,yellow-0 :bold t))))
+   `(haskell-interactive-face-result ((,class (:foreground ,blue-2))))
+
+
    ;; Custom
    `(custom-button ((,class (:foreground ,white-0 :background ,black-3
                                          :box (:line-width 1 :style 
released-button)))))

Reply via email to