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

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

[nongnu] elpa/gruvbox-theme 6046d4e2f2 049/258: Convert rainbow-delimite


From: ELPA Syncer
Subject: [nongnu] elpa/gruvbox-theme 6046d4e2f2 049/258: Convert rainbow-delimiters-depth-faces to use variables instead of hex literals
Date: Sat, 1 Jan 2022 01:59:28 -0500 (EST)

branch: elpa/gruvbox-theme
commit 6046d4e2f23d461082075000c56547063851bb81
Author: Jason Milkins <jasonm23@gmail.com>
Commit: Jason Milkins <jasonm23@gmail.com>

    Convert rainbow-delimiters-depth-faces to use variables instead of hex 
literals
---
 gruvbox-theme.el | 37 ++++++++++++++++++++-----------------
 1 file changed, 20 insertions(+), 17 deletions(-)

diff --git a/gruvbox-theme.el b/gruvbox-theme.el
index 4b576d7376..53d69a31f6 100644
--- a/gruvbox-theme.el
+++ b/gruvbox-theme.el
@@ -34,7 +34,7 @@
 ;;; Code:
 
 (unless (>= emacs-major-version 24)
-  (error "requires Emacs 24 or later."))
+  (error "Requires Emacs 24 or later"))
 
 (deftheme gruvbox "A retro-groove colour theme")
 (let ((gruvbox-dark0_hard  (if (display-graphic-p) "#1d2021" "color-234"))
@@ -78,7 +78,12 @@
       (gruvbox-faded_blue     (if (display-graphic-p) "#076678" "color-24"))
       (gruvbox-faded_purple   (if (display-graphic-p) "#8f3f71" "color-96"))
       (gruvbox-faded_aqua     (if (display-graphic-p) "#427b58" "color-66"))
-      (gruvbox-faded_orange   (if (display-graphic-p) "#af3a03" "color-130")))
+      (gruvbox-faded_orange   (if (display-graphic-p) "#af3a03" "color-130"))
+
+      (gruvbox-delimiter-one    (if (display-graphic-p) "#458588" "color-30"))
+      (gruvbox-delimiter-two    (if (display-graphic-p) "#b16286" "color-168"))
+      (gruvbox-delimiter-three  (if (display-graphic-p) "#cc241d" "color-124"))
+      (gruvbox-delimiter-four   (if (display-graphic-p) "#d65d0e" 
"color-166")))
 
   (custom-theme-set-faces
     'gruvbox
@@ -117,21 +122,19 @@
     `(whitespace-empty ((t (:background nil :foreground nil))))
     `(whitespace-space-after-tab ((t (:background ,gruvbox-dark0 :foreground 
,gruvbox-dark4))))
 
-    ;; TODO
-    ;; - Replace with variable values
     ;; RainbowDelimiters
-    `(rainbow-delimiters-depth-1-face   ((t (:foreground "#458588"))))
-    `(rainbow-delimiters-depth-2-face   ((t (:foreground "#b16286"))))
-    `(rainbow-delimiters-depth-3-face   ((t (:foreground "#cc241d"))))
-    `(rainbow-delimiters-depth-4-face   ((t (:foreground "#d65d0e"))))
-    `(rainbow-delimiters-depth-5-face   ((t (:foreground "#458488"))))
-    `(rainbow-delimiters-depth-6-face   ((t (:foreground "#b16286"))))
-    `(rainbow-delimiters-depth-7-face   ((t (:foreground "#cc241d"))))
-    `(rainbow-delimiters-depth-8-face   ((t (:foreground "#d65d0e"))))
-    `(rainbow-delimiters-depth-9-face   ((t (:foreground "#458588"))))
-    `(rainbow-delimiters-depth-10-face  ((t (:foreground "#b16286"))))
-    `(rainbow-delimiters-depth-11-face  ((t (:foreground "#cc241d"))))
-    `(rainbow-delimiters-depth-12-face  ((t (:foreground "#d65d0e"))))
+    `(rainbow-delimiters-depth-1-face   ((t (:foreground 
,gruvbox-delimiter-one))))
+    `(rainbow-delimiters-depth-2-face   ((t (:foreground 
,gruvbox-delimiter-two))))
+    `(rainbow-delimiters-depth-3-face   ((t (:foreground 
,gruvbox-delimiter-three))))
+    `(rainbow-delimiters-depth-4-face   ((t (:foreground 
,gruvbox-delimiter-four))))
+    `(rainbow-delimiters-depth-5-face   ((t (:foreground 
,gruvbox-delimiter-one))))
+    `(rainbow-delimiters-depth-6-face   ((t (:foreground 
,gruvbox-delimiter-two))))
+    `(rainbow-delimiters-depth-7-face   ((t (:foreground 
,gruvbox-delimiter-three))))
+    `(rainbow-delimiters-depth-8-face   ((t (:foreground 
,gruvbox-delimiter-four))))
+    `(rainbow-delimiters-depth-9-face   ((t (:foreground 
,gruvbox-delimiter-one))))
+    `(rainbow-delimiters-depth-10-face  ((t (:foreground 
,gruvbox-delimiter-two))))
+    `(rainbow-delimiters-depth-11-face  ((t (:foreground 
,gruvbox-delimiter-three))))
+    `(rainbow-delimiters-depth-12-face  ((t (:foreground 
,gruvbox-delimiter-four))))
     `(rainbow-delimiters-unmatched-face ((t (:background nil :foreground 
,gruvbox-light0))))
 
     ;; linum-relative
@@ -182,7 +185,7 @@
     ,gruvbox-neutral_purple ,gruvbox-neutral_aqua ,gruvbox-light1])))
 
 (defun gruvbox-set-ansi-color-names-vector ()
-  "Give comint and the like the same colours as the term colours we set"
+  "Give comint and the like the same colours as the term colours we set."
   (setq ansi-color-names-vector
     [term-color-black term-color-red term-color-green term-color-yellow 
term-color-blue
      term-color-purple term-color-aqua term-color-white]))



reply via email to

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