[nongnu] elpa/moe-theme 5388b25528 221/352: Add faces for menu-bar in Emacs 24.4.

[ELPA Syncer]

branch: elpa/moe-theme
commit 5388b255281457db56355b0105a903da7a47747f
Author: kuanyui <azazabc123@gmail.com>
Commit: kuanyui <azazabc123@gmail.com>

    Add faces for menu-bar in Emacs 24.4.
---
 moe-dark-theme.el  |  7 +++++++
 moe-light-theme.el | 12 +++++++++---
 2 files changed, 16 insertions(+), 3 deletions(-)

diff --git a/moe-dark-theme.el b/moe-dark-theme.el
index 030b4e80ad..03a0f7bdf3 100644
--- a/moe-dark-theme.el
+++ b/moe-dark-theme.el
@@ -29,6 +29,7 @@ Moe, moe, kyun!")
       (red-0 "#ff4b4b") (red-00 "#ffafaf")
       (magenta-0 "#ffafd7") (magenta-00 "#ffd7ff")
       (orange-0 "#ffaf87") (orange-00 "#ffd787") (orange-000 "#ffd7af")
+      (linum-dark "#87875f") (linum-light "#d7d7af")
       )
 
 
@@ -748,6 +749,12 @@ Moe, moe, kyun!")
    `(haskell-interactive-face-prompt ((,class (:foreground ,green-01 
:background ,black-2-5 :bold t))))
    `(haskell-interactive-face-result ((,class (:foreground ,blue-1))))
 
+   ;; tty-menu
+   `(menu ((,class (:foreground ,black-1 :background ,black-3))))
+   `(tty-menu-disabled-face ((,class (:foreground ,black-2-5 :background 
,black-3))))
+   `(tty-menu-enabled-face ((,class (:foreground ,white-0 :background ,black-3 
:bold t))))
+   `(tty-menu-selected-face ((,class (:background ,blue-3))))
+
    ;; 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 12716abc96..1d36390559 100644
--- a/moe-light-theme.el
+++ b/moe-light-theme.el
@@ -29,6 +29,7 @@ Moe, moe, kyun!")
       (red-0 "#ff4b4b") (red-00 "#ffafaf") (red-000 "#ffd5e5")
       (magenta-0 "#ffafd7") (magenta-00 "#ffd7ff")
       (orange-0 "#ffaf87") (orange-00 "#ffd787") (orange-000 "#ffd7af")
+      (linum-dark "#87875f") (linum-light "#d7d7af")
       )
 
   (custom-theme-set-faces
@@ -43,9 +44,9 @@ Moe, moe, kyun!")
    `(cursor ((,class (:background ,black-5))))
 
    ;; Highlighting faces
-   `(fringe ((,class (:foreground ,black-1 :background "#d7d7af"))))
-   `(linum ((,class (:foreground "#87875f" :background "#d7d7af"))))
-   `(linum-highlight-face ((,class (:background "#87875f" :foreground 
"#d7d7af"))))
+   `(fringe ((,class (:foreground ,black-1 :background ,linum-light))))
+   `(linum ((,class (:foreground ,linum-dark :background ,linum-light))))
+   `(linum-highlight-face ((,class (:background ,linum-dark :foreground 
,linum-light))))
    `(highlight ((,class (:background ,green-0))))
    `(hl-line ((,class (:background ,green-00)))) ; Embedded strings of IM 
(e.g. fcitx) would be very unreadable... orz
    `(highlight-symbol-face ((,class (:background ,green-00))))
@@ -753,6 +754,11 @@ Moe, moe, kyun!")
    `(haskell-interactive-face-prompt ((,class (:foreground ,black-4 
:background ,yellow-0 :bold t))))
    `(haskell-interactive-face-result ((,class (:foreground ,blue-2))))
 
+   `(menu ((,class (:foreground ,linum-light :background ,linum-dark))))
+   `(tty-menu-disabled-face ((,class (:foreground ,black-1 :background 
,black-3))))
+   `(tty-menu-enabled-face ((,class (:foreground ,white-0 :background ,black-3 
:bold t))))
+   `(tty-menu-selected-face ((,class (:background ,blue-3))))
+
 
    ;; Custom
    `(custom-button ((,class (:foreground ,white-0 :background ,black-3