[nongnu] elpa/alect-themes d3443de 024/269: Replace white/gray/black with a gray group

[ELPA Syncer]

branch: elpa/alect-themes
commit d3443de513e48389286a3f971fed3548b23cf10f
Author: Alex Kost <alezost@gmail.com>
Commit: Alex Kost <alezost@gmail.com>

    Replace white/gray/black with a gray group
---
 alect-themes.el | 32 +++++++++++++++++---------------
 1 file changed, 17 insertions(+), 15 deletions(-)

diff --git a/alect-themes.el b/alect-themes.el
index caf990a..1cd758c 100644
--- a/alect-themes.el
+++ b/alect-themes.el
@@ -86,9 +86,11 @@ values should be in matching order)."
   (alect-generate-colors
    '(light dark)
    '((cursor    "#1074cd" "#ffec8b")
-     (white     "#fafafa" "#e9e9e9")
+     (gray-2    "#fafafa" "#e9e9e9")
+     (gray-1    "#bdbdbd" "#c0c0c0")
      (gray      "#808080" "#aaaaaa")
-     (black     "#070707" "#000000")
+     (gray+1    "#444444" "#555555")
+     (gray+2    "#070707" "#000000")
      (fg-2      "#6c6c6c" "#8c826d")
      (fg-1      "#505050" "#d0bf8f")
      (fg        "#3f3f3f" "#f0dfaf")
@@ -220,8 +222,8 @@ For INVERT, see `alect-get-color'."
                                  :box (:line-width 1
                                        :color ,(gc 'fg+2)
                                        :style nil)))))
-       (highlight           ((t (:foreground ,(gc 'black)
-                                 :background ,(gc 'white)))))
+       (highlight           ((t (:foreground ,(gc 'gray+2)
+                                 :background ,(gc 'gray-2)))))
        (shadow              ((t (:foreground ,(gc 'gray)))))
        (success             ((t (:foreground ,(gc 'green) :weight bold))))
        (warning             ((t (:foreground ,(gc 'yellow-1) :weight normal))))
@@ -277,7 +279,7 @@ For INVERT, see `alect-get-color'."
        (font-latex-title-4  ((t (:inherit variable-pitch :weight bold))))
 
        ;; auto-complete
-       (ac-candidate-face                 ((t (:foreground ,(gc 'black)
+       (ac-candidate-face                 ((t (:foreground ,(gc 'gray+2)
                                                :background ,(gc 'bg+2)))))
        (ac-selection-face                 ((t (:foreground ,(gc 'fg+1)
                                                :background ,(gc 'cyan+1) ))))
@@ -336,10 +338,10 @@ For INVERT, see `alect-get-color'."
                                             :box (:line-width 2
                                                   :style pressed-button)))))
        (custom-button-mouse            ((t (:inherit custom-button-unraised
-                                            :background ,(gc 'white)
+                                            :background ,(gc 'gray-2)
                                             :box (:line-width 2
                                                   :style released-button)))))
-       (custom-button-unraised         ((t (:foreground ,(gc 'black)
+       (custom-button-unraised         ((t (:foreground ,(gc 'gray+2)
                                             :background ,(gc 'bg+2)))))
        (custom-button-pressed-unraised ((t (:inherit custom-button-unraised 
:underline t))))
        (custom-documentation           ((t (:inherit font-lock-doc-face))))
@@ -535,7 +537,7 @@ For INVERT, see `alect-get-color'."
        (gnus-summary-high-ticked     ((t (:inherit gnus-summary-normal-ticked  
:weight bold))))
        (gnus-summary-high-unread     ((t (:inherit gnus-summary-normal-unread  
:weight bold))))
        (gnus-summary-selected        ((t (:background ,(gc 'green)
-                                          :foreground ,(gc 'white)))))
+                                          :foreground ,(gc 'gray-2)))))
        (gnus-cite-1                  ((t (:inherit alect-color-level-1))))
        (gnus-cite-2                  ((t (:inherit alect-color-level-2))))
        (gnus-cite-3                  ((t (:inherit alect-color-level-3))))
@@ -784,15 +786,15 @@ For INVERT, see `alect-get-color'."
        (newsticker-treeview-selection-face  ((t (:foreground ,(gc 'yellow)))))
 
        ;; org-mode
-       (org-agenda-date-today     ((t (:foreground ,(gc 'white)
+       (org-agenda-date-today     ((t (:foreground ,(gc 'gray-2)
                                        :slant italic :weight bold))) t)
        (org-agenda-structure      ((t (:inherit font-lock-comment-face))))
        (org-archived              ((t (:foreground ,(gc 'fg+1) :weight bold))))
        (org-checkbox              ((t (:background ,(gc 'bg+1)
-                                       :foreground ,(gc 'white)
+                                       :foreground ,(gc 'gray-2)
                                        :box (:line-width 1 :style 
released-button)))))
        (org-date                  ((t (:foreground ,(gc 'cyan-2) :underline 
nil))))
-       (org-date-selected         ((t (:foreground ,(gc 'white) :background 
,(gc 'red+1)))))
+       (org-date-selected         ((t (:foreground ,(gc 'gray-2) :background 
,(gc 'red+1)))))
        (org-deadline-announce     ((t (:foreground ,(gc 'red-1)))))
        (org-done                  ((t (:foreground ,(gc 'cyan-1) :weight 
bold))))
        (org-formula               ((t (:foreground ,(gc 'yellow-2)))))
@@ -831,7 +833,7 @@ For INVERT, see `alect-get-color'."
        (outline-8 ((t (:inherit alect-color-level-8 :weight bold :height 
1.12))))
 
        ;; popup
-       (popup-tip-face                    ((t (:foreground ,(gc 'black)
+       (popup-tip-face                    ((t (:foreground ,(gc 'gray+2)
                                                :background ,(gc 'yellow-2)))))
        (popup-scroll-bar-foreground-face  ((t (:background ,(gc 'cyan+2)))))
        (popup-scroll-bar-background-face  ((t (:background ,(gc 'bg-2)))))
@@ -892,9 +894,9 @@ For INVERT, see `alect-get-color'."
        (sh-quoted-exec ((t (:foreground ,(gc 'cyan)))))
 
        ;; show-paren
-       (show-paren-mismatch  ((t (:foreground ,(gc 'white)
+       (show-paren-mismatch  ((t (:foreground ,(gc 'gray-2)
                                   :background ,(gc 'red)))))
-       (show-paren-match     ((t (:foreground ,(gc 'white)
+       (show-paren-match     ((t (:foreground ,(gc 'gray-2)
                                   :background ,(gc 'green+1)))))
 
        ;; SLIME
@@ -1048,7 +1050,7 @@ For INVERT, see `alect-get-color'."
        (whitespace-newline           ((t (:foreground ,(gc 'blue-2)))))
        (whitespace-trailing          ((t (:background ,(gc 'red)))))
        (whitespace-line              ((t (:background ,(gc 'gray)
-                                          :foreground ,(gc 'white)))))
+                                          :foreground ,(gc 'gray-2)))))
        (whitespace-space-before-tab  ((t (:background ,(gc 'fg-2)
                                           :foreground ,(gc 'fg-2)))))
        (whitespace-indentation       ((t (:background ,(gc 'yellow-2)