[elpa] externals/modus-vivendi-theme cf0a1f2 17/73: Add support for Emacs 27 line number ticks

[Stefan Monnier]

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

    Add support for Emacs 27 line number ticks
    
    Enable those with something like:
    
        (setq display-line-numbers-major-tick 20)
        (setq display-line-numbers-minor-tick 5)
---
 modus-operandi-theme.el | 6 ++++++
 modus-vivendi-theme.el  | 6 ++++++
 2 files changed, 12 insertions(+)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index c6d2b83..a56ef48 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -3896,6 +3896,12 @@ Also bind `class' to ((class color) (min-colors 89))."
   (when (>= emacs-major-version 27)
     (custom-theme-set-faces
      'modus-operandi
+;;;;; line numbers (`display-line-numbers-mode' and global variant)
+     ;; NOTE that this is specifically for the faces that were
+     ;; introduced in Emacs 27, as the other faces are already
+     ;; supported.
+     `(line-number-major-tick ((,class (:background ,yellow-nuanced-bg 
:foreground ,yellow-nuanced))))
+     `(line-number-minor-tick ((,class (:background ,cyan-nuanced-bg 
:foreground ,cyan-nuanced))))
 ;;;;; tab-bar-mode
      `(tab-bar ((,class :background ,bg-tab-bar :foreground ,fg-main)))
      `(tab-bar-tab ((,class :inherit bold :box (:line-width 2 :color 
,bg-tab-active)
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index e963f18..60757cb 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -3896,6 +3896,12 @@ Also bind `class' to ((class color) (min-colors 89))."
   (when (>= emacs-major-version 27)
     (custom-theme-set-faces
      'modus-vivendi
+;;;;; line numbers (`display-line-numbers-mode' and global variant)
+     ;; NOTE that this is specifically for the faces that were
+     ;; introduced in Emacs 27, as the other faces are already
+     ;; supported.
+     `(line-number-major-tick ((,class (:background ,yellow-nuanced-bg 
:foreground ,yellow-nuanced))))
+     `(line-number-minor-tick ((,class (:background ,cyan-nuanced-bg 
:foreground ,cyan-nuanced))))
 ;;;;; tab-bar-mode
      `(tab-bar ((,class :background ,bg-tab-bar :foreground ,fg-main)))
      `(tab-bar-tab ((,class :inherit bold :box (:line-width 2 :color 
,bg-tab-active)