[elpa] externals/modus-operandi-theme 7c67f73 50/54: Add support for EL-SEARCH

[Stefan Monnier]

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

    Add support for EL-SEARCH
---
 README.org              | 1 +
 modus-operandi-theme.el | 6 ++++++
 modus-vivendi-theme.el  | 6 ++++++
 3 files changed, 13 insertions(+)

diff --git a/README.org b/README.org
index 6d1b7e2..c261b82 100644
--- a/README.org
+++ b/README.org
@@ -704,6 +704,7 @@ the "full support" may not be 100% true…
 + ebdb
 + ediff
 + eglot
++ el-search
 + eldoc-box
 + elfeed
 + elfeed-score
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index b41b471..3e7b7ae 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -124,6 +124,7 @@
 ;;     ebdb
 ;;     ediff
 ;;     eglot
+;;     el-search
 ;;     eldoc-box
 ;;     elfeed
 ;;     elfeed-score
@@ -1478,6 +1479,11 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(ediff-odd-diff-C ((,class (:background ,bg-diff-neutral-1 :foreground 
,fg-diff-neutral-1))))
    ;;;; eglot
    `(eglot-mode-line ((,class (:foreground ,magenta-active :weight 
,modus-theme-bold))))
+   ;;;; el-search
+   `(el-search-highlight-in-prompt-face ((,class (:foreground ,magenta-alt 
:weight bold))))
+   `(el-search-match ((,class (:inherit modus-theme-intense-green))))
+   `(el-search-other-match ((,class (:inherit modus-theme-special-mild))))
+   `(el-search-occur-match ((,class (:inherit modus-theme-special-calm))))
    ;;;; eldoc-box
    `(eldoc-box-body ((,class (:background ,bg-alt :foreground ,fg-main))))
    `(eldoc-box-border ((,class (:background ,fg-alt))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index cb36142..f22fb0d 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -124,6 +124,7 @@
 ;;     ebdb
 ;;     ediff
 ;;     eglot
+;;     el-search
 ;;     eldoc-box
 ;;     elfeed
 ;;     elfeed-score
@@ -1478,6 +1479,11 @@ Also bind `class' to ((class color) (min-colors 89))."
    `(ediff-odd-diff-C ((,class (:background ,bg-diff-neutral-1 :foreground 
,fg-diff-neutral-1))))
    ;;;; eglot
    `(eglot-mode-line ((,class (:foreground ,magenta-active :weight 
,modus-theme-bold))))
+   ;;;; el-search
+   `(el-search-highlight-in-prompt-face ((,class (:foreground ,magenta-alt 
:weight bold))))
+   `(el-search-match ((,class (:inherit modus-theme-intense-green))))
+   `(el-search-other-match ((,class (:inherit modus-theme-special-mild))))
+   `(el-search-occur-match ((,class (:inherit modus-theme-special-calm))))
    ;;;; eldoc-box
    `(eldoc-box-body ((,class (:background ,bg-alt :foreground ,fg-main))))
    `(eldoc-box-border ((,class (:background ,fg-alt))))