[elpa] externals/modus-operandi-theme aea6d29 69/99: Add support for built-in TTY-MENU faces

[Stefan Monnier]

branch: externals/modus-operandi-theme
commit aea6d2966e41ff2f1cdcb8852e57a65482a4312c
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Add support for built-in TTY-MENU faces
    
    These are used when menu-bar-mode is enabled in a TTY session and the
    user runs the menu-bar-open command.
    
    Due to the nature of text terminals, colours may not be faithful to
    their GUI counterparts.
---
 README.org              | 14 +-------------
 modus-operandi-theme.el |  5 +++++
 modus-vivendi-theme.el  |  5 +++++
 3 files changed, 11 insertions(+), 13 deletions(-)

diff --git a/README.org b/README.org
index 90b14e7..58e4aab 100644
--- a/README.org
+++ b/README.org
@@ -1120,6 +1120,7 @@ the "full support" may not be 100% true…
 + transient (pop-up windows such as Magit's)
 + trashed
 + treemacs
++ tty-menu
 + tuareg
 + undo-tree
 + vc (built-in mode line status for version control)
@@ -1163,19 +1164,6 @@ inherit from some basic faces.  Please confirm.
 + edit-indirect
 + swift-mode
 
-** Help needed
-   :PROPERTIES:
-   :CUSTOM_ID: h:bcc3f6f9-7ace-4e2a-8dbb-2bf55574dae5
-   :END:
-
-These are face groups that I am aware of but do not know how to access
-or do not actively use.  I generally need to see how a face looks in its
-context before assessing its aesthetics or specific requirements.
-
-Use =M-x list-faces-display= to get these.
-
-+ tty-menu
-
 ** Will NOT be supported
    :PROPERTIES:
    :CUSTOM_ID: h:46756fcc-0d85-4f77-b0e3-64f890e1c2ea
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 6ec8616..af0b1c2 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -296,6 +296,7 @@
 ;;     tomatinho
 ;;     transient (pop-up windows like Magit's)
 ;;     treemacs
+;;     tty-menu
 ;;     tuareg
 ;;     undo-tree
 ;;     vc (built-in mode line status for version control)
@@ -3484,6 +3485,10 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(treemacs-root-unreadable-face ((,class :inherit treemacs-root-face 
:strike-through t)))
    `(treemacs-tags-face ((,class :foreground ,blue-alt)))
    `(treemacs-tags-face ((,class :foreground ,magenta-alt)))
+   ;;;; tty-menu
+   `(tty-menu-disabled-face ((,class :background ,bg-alt :foreground ,fg-alt)))
+   `(tty-menu-enabled-face ((,class :background ,bg-alt :foreground ,fg-main 
:weight bold)))
+   `(tty-menu-selected-face ((,class :inherit modus-theme-intense-blue)))
    ;;;; tuareg
    `(caml-types-def-face ((,class :inherit modus-theme-subtle-red)))
    `(caml-types-expr-face ((,class :inherit modus-theme-subtle-green)))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 1e4fc71..33fe032 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -296,6 +296,7 @@
 ;;     tomatinho
 ;;     transient (pop-up windows like Magit's)
 ;;     treemacs
+;;     tty-menu
 ;;     tuareg
 ;;     undo-tree
 ;;     vc (built-in mode line status for version control)
@@ -3484,6 +3485,10 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(treemacs-root-unreadable-face ((,class :inherit treemacs-root-face 
:strike-through t)))
    `(treemacs-tags-face ((,class :foreground ,blue-alt)))
    `(treemacs-tags-face ((,class :foreground ,magenta-alt)))
+   ;;;; tty-menu
+   `(tty-menu-disabled-face ((,class :background ,bg-alt :foreground ,fg-alt)))
+   `(tty-menu-enabled-face ((,class :background ,bg-alt :foreground ,fg-main 
:weight bold)))
+   `(tty-menu-selected-face ((,class :inherit modus-theme-intense-blue)))
    ;;;; tuareg
    `(caml-types-def-face ((,class :inherit modus-theme-subtle-red)))
    `(caml-types-expr-face ((,class :inherit modus-theme-subtle-green)))