[elpa] externals/modus-operandi-theme b09c076 041/112: Add support for BM (visual bookmarks for Emacs)

[Stefan Monnier]

branch: externals/modus-operandi-theme
commit b09c0764cdb007ae05bc227457f612f8fb10d0b3
Author: Protesilaos Stavrou <address@hidden>
Commit: Protesilaos Stavrou <address@hidden>

    Add support for BM (visual bookmarks for Emacs)
    
    Addresses issue 23:
    https://gitlab.com/protesilaos/modus-themes/-/issues/23
---
 README.org              | 1 +
 modus-operandi-theme.el | 8 ++++++++
 modus-vivendi-theme.el  | 8 ++++++++
 3 files changed, 17 insertions(+)

diff --git a/README.org b/README.org
index 40ca093..4a851d7 100644
--- a/README.org
+++ b/README.org
@@ -176,6 +176,7 @@ the "full support" may not be 100% true…
 + artbollocks-mode
 + auto-dim-other-buffers
 + avy
++ bm
 + breakpoint (provided by built-in gdb-mi.el)
 + buffer-expose
 + calendar and diary
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 3b5f84b..66512bf 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -67,6 +67,7 @@
 ;;     auto-dim-other-buffers
 ;;     avy
 ;;     breakpoint (provided by built-in gdb-mi.el)
+;;     bm
 ;;     buffer-expose
 ;;     calendar and diary
 ;;     calfw
@@ -617,6 +618,13 @@ between foreground and background is >= 7:1)."
    `(aw-leading-char-face ((,class (:height 1.5 :background ,bg-main 
:foreground ,red-intense :weight bold))))
    `(aw-minibuffer-leading-char-face ((,class (:foreground ,magenta-active))))
    `(aw-mode-line-face ((,class (:weight bold))))
+   ;;;; bm
+   `(bm-face ((,class (:inherit modus-theme-subtle-yellow
+                                ,@(and (>= emacs-major-version 27) '(:extend 
t))))))
+   `(bm-fringe-face ((,class (:inherit modus-theme-subtle-yellow))))
+   `(bm-fringe-persistent-face ((,class (:inherit modus-theme-intense-blue))))
+   `(bm-persistent-face ((,class (:inherit modus-theme-intense-blue
+                                           ,@(and (>= emacs-major-version 27) 
'(:extend t))))))
    ;;;; buttons, links, widgets
    `(button ((,class (:foreground ,blue-alt-other :underline t))))
    `(link ((,class (:foreground ,blue-alt-other :underline t))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 18a150b..3f4784d 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -67,6 +67,7 @@
 ;;     auto-dim-other-buffers
 ;;     avy
 ;;     breakpoint (provided by built-in gdb-mi.el)
+;;     bm
 ;;     buffer-expose
 ;;     calendar and diary
 ;;     calfw
@@ -617,6 +618,13 @@ between foreground and background is >= 7:1)."
    `(aw-leading-char-face ((,class (:height 1.5 :background ,bg-main 
:foreground ,red-intense :weight bold))))
    `(aw-minibuffer-leading-char-face ((,class (:foreground ,magenta-active))))
    `(aw-mode-line-face ((,class (:weight bold))))
+   ;;;; bm
+   `(bm-face ((,class (:inherit modus-theme-subtle-yellow
+                                ,@(and (>= emacs-major-version 27) '(:extend 
t))))))
+   `(bm-fringe-face ((,class (:inherit modus-theme-subtle-yellow))))
+   `(bm-fringe-persistent-face ((,class (:inherit modus-theme-intense-blue))))
+   `(bm-persistent-face ((,class (:inherit modus-theme-intense-blue
+                                           ,@(and (>= emacs-major-version 27) 
'(:extend t))))))
    ;;;; buttons, links, widgets
    `(button ((,class (:foreground ,blue-alt-other :underline t))))
    `(link ((,class (:foreground ,blue-alt-other :underline t))))