branch: externals/modus-operandi-theme
commit 0394bddff35d72400457bb783d3cfe91e7794728
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Add support for IOCCUR
---
README.org | 1 +
modus-operandi-theme.el | 14 ++++++++++++++
modus-vivendi-theme.el | 14 ++++++++++++++
3 files changed, 29 insertions(+)
diff --git a/README.org b/README.org
index d95ed3f..8f5ce65 100644
--- a/README.org
+++ b/README.org
@@ -287,6 +287,7 @@ the "full support" may not be 100% true…
+ info
+ info-colors
+ interaction-log
++ ioccur
+ isearch, occur, etc.
+ ivy*
+ ivy-posframe
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 393dd22..f5e96f9 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -164,6 +164,7 @@
;; info
;; info-colors
;; interaction-log
+;; ioccur
;; isearch, occur, etc.
;; ivy
;; ivy-posframe
@@ -1684,6 +1685,19 @@ between foreground and background is >= 7:1)."
`(ilog-load-face ((,class (:foreground ,green))))
`(ilog-message-face ((,class (:foreground ,fg-alt))))
`(ilog-non-change-face ((,class (:foreground ,blue))))
+ ;;;; ioccur
+ `(ioccur-cursor ((,class (:foreground ,fg-main))))
+ `(ioccur-invalid-regexp ((,class (:foreground ,red))))
+ `(ioccur-match-face ((,class (:inherit modus-theme-special-calm))))
+ `(ioccur-match-overlay-face ((,class (,@(and (>= emacs-major-version 27)
'(:extend t))
+ :inherit modus-theme-special-cold))))
+ `(ioccur-num-line-face ((,class (:foreground ,fg-special-warm))))
+ `(ioccur-overlay-face ((,class (,@(and (>= emacs-major-version 27)
'(:extend t))
+ :inherit modus-theme-refine-blue))))
+ `(ioccur-regexp-face ((,class (:inherit modus-theme-intense-magenta :weight
bold))))
+ `(ioccur-title-face ((,class (:foreground ,red-alt :weight bold
+ ,@(when
modus-operandi-theme-scale-headings
+ (list :height
modus-operandi-theme-scale-4))))))
;;;; isearch, occur, and the like
`(isearch ((,class (:inherit modus-theme-intense-green :weight bold))))
`(isearch-fail ((,class (:inherit modus-theme-refine-red))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 42fb577..f2c61e8 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -164,6 +164,7 @@
;; info
;; info-colors
;; interaction-log
+;; ioccur
;; isearch, occur, etc.
;; ivy
;; ivy-posframe
@@ -1684,6 +1685,19 @@ between foreground and background is >= 7:1)."
`(ilog-load-face ((,class (:foreground ,green))))
`(ilog-message-face ((,class (:foreground ,fg-alt))))
`(ilog-non-change-face ((,class (:foreground ,blue))))
+ ;;;; ioccur
+ `(ioccur-cursor ((,class (:foreground ,fg-main))))
+ `(ioccur-invalid-regexp ((,class (:foreground ,red))))
+ `(ioccur-match-face ((,class (:inherit modus-theme-special-calm))))
+ `(ioccur-match-overlay-face ((,class (,@(and (>= emacs-major-version 27)
'(:extend t))
+ :inherit modus-theme-special-cold))))
+ `(ioccur-num-line-face ((,class (:foreground ,fg-special-warm))))
+ `(ioccur-overlay-face ((,class (,@(and (>= emacs-major-version 27)
'(:extend t))
+ :inherit modus-theme-refine-blue))))
+ `(ioccur-regexp-face ((,class (:inherit modus-theme-intense-magenta :weight
bold))))
+ `(ioccur-title-face ((,class (:foreground ,red-alt :weight bold
+ ,@(when
modus-operandi-theme-scale-headings
+ (list :height
modus-operandi-theme-scale-4))))))
;;;; isearch, occur, and the like
`(isearch ((,class (:inherit modus-theme-intense-green :weight bold))))
`(isearch-fail ((,class (:inherit modus-theme-refine-red))))
