emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/standard-themes 9dce7da07d 5/6: DEPRECATE standard-them


From: ELPA Syncer
Subject: [elpa] externals/standard-themes 9dce7da07d 5/6: DEPRECATE standard-themes-mode-line-accented; use palette overrides instead
Date: Sun, 26 Nov 2023 00:59:02 -0500 (EST)

branch: externals/standard-themes
commit 9dce7da07db838a182dad577afbb5bcc53743943
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    DEPRECATE standard-themes-mode-line-accented; use palette overrides instead
    
    We already have a powerful system of palette overrides where the user
    can specify any colour for each key in the palette. This means that
    instead of a hardcoded value for an "intense" or "subtle" style, we
    give the user the freedom to pick exactly the hue and intensity they
    prefer.
    
    The user options for palette overrides are:
    
    - standard-themes-common-palette-overrides
    - standard-dark-palette-overrides
    - standard-light-palette-overrides
---
 standard-dark-theme.el  |  8 +++++++-
 standard-light-theme.el |  8 +++++++-
 standard-themes.el      | 15 ++++-----------
 3 files changed, 18 insertions(+), 13 deletions(-)

diff --git a/standard-dark-theme.el b/standard-dark-theme.el
index 2df8e2b714..fecec42ad9 100644
--- a/standard-dark-theme.el
+++ b/standard-dark-theme.el
@@ -130,7 +130,6 @@
 
       ;; Special hues
       (bg-fringe     bg-dim)
-      (bg-mode-line  "#505050") (bg-mode-line-inactive "#323232")
       (bg-accent     "#ffc200")
       (bg-completion "#254b5f")
       (bg-hover      "#457b2f")
@@ -146,6 +145,13 @@
       (border        "#606070")
       (cursor        "#ffffff")
 
+      (bg-mode-line-active        "#505050")
+      (fg-mode-line-active        "#ffffff")
+      (border-mode-line-active    "#959595")
+      (bg-mode-line-inactive      "#323232")
+      (fg-mode-line-inactive      "#969696")
+      (border-mode-line-inactive  "#606060")
+
       (bg-tab              "#333333")
       (bg-tab-inactive     "#4d4d4d")
       (bg-tab-inactive-alt "#666666")
diff --git a/standard-light-theme.el b/standard-light-theme.el
index 2aa326f601..46cf1ebf15 100644
--- a/standard-light-theme.el
+++ b/standard-light-theme.el
@@ -130,7 +130,6 @@
 
       ;; Special hues
       (bg-fringe     bg-dim)
-      (bg-mode-line  "#b3b3b3") (bg-mode-line-inactive "#e5e5e5")
       (bg-accent     "#0000cc")
       (bg-completion "#bfe8ff")
       (bg-hover      "#aaeccf")
@@ -146,6 +145,13 @@
       (border        "#bababa")
       (cursor        "#000000")
 
+      (bg-mode-line-active        "#b3b3b3")
+      (fg-mode-line-active        "#000000")
+      (border-mode-line-active    "#5a5a5a")
+      (bg-mode-line-inactive      "#e5e5e5")
+      (fg-mode-line-inactive      "#585858")
+      (border-mode-line-inactive  "#a3a3a3")
+
       (bg-tab              "#d9d9d9")
       (bg-tab-inactive     "#bfbfbf")
       (bg-tab-inactive-alt "#a6a6a6")
diff --git a/standard-themes.el b/standard-themes.el
index 892e8c4b27..805f24afd9 100644
--- a/standard-themes.el
+++ b/standard-themes.el
@@ -284,13 +284,7 @@ In user configuration files the form may look like this:
               (const :tag "Italic font slant" italic))
   :link '(info-link "(standard-themes) Option for command prompts"))
 
-(defcustom standard-themes-mode-line-accented nil
-  "When non-nil, use accented background for the active mode line.
-The default is a gray background color."
-  :group 'standard-themes
-  :package-version '(standard-themes . "1.0.0")
-  :type 'boolean
-  :link '(info-link "(standard-themes) Accented mode line"))
+(make-obsolete-variable 'standard-themes-mode-line-accented nil "2.0.0")
 
 (defcustom standard-themes-common-palette-overrides nil
   "Set palette overrides for all the Standard themes.
@@ -1494,10 +1488,9 @@ Optional prefix argument MAPPINGS has the same meaning 
as for
     `(message-separator ((,c :background ,bg-alt)))
 ;;;; mode-line
     `(mode-line ((,c :inherit standard-themes-ui-variable-pitch
-                     :background ,@(if standard-themes-mode-line-accented
-                                       (list bg-mode-line-accent)
-                                     (list bg-mode-line))
-                     :foreground ,fg-main)))
+                     :box ,border-mode-line-active
+                     :background ,bg-mode-line-active
+                     :foreground ,fg-mode-line-active)))
     `(mode-line-active ((,c :inherit mode-line :box (:line-width -1 :style 
released-button))))
     `(mode-line-buffer-id ((,c :inherit bold)))
     `(mode-line-emphasis ((,c :inherit bold :foreground ,modeline-info)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]