From b4c8e940c470c8b24ee990f2d6fbae734ed80500 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@imladris.local>
Date: Sun, 11 Mar 2018 23:01:44 +0100
Subject: themes tweaks

---
 themes/jao-mono-dark-theme.el | 37 ++++++++++++++++++++++---------------
 themes/jao-themes.el          |  8 ++++++--
 2 files changed, 28 insertions(+), 17 deletions(-)

(limited to 'themes')

diff --git a/themes/jao-mono-dark-theme.el b/themes/jao-mono-dark-theme.el
index 560d42b..a5cf532 100644
--- a/themes/jao-mono-dark-theme.el
+++ b/themes/jao-mono-dark-theme.el
@@ -1,11 +1,13 @@
 (jao-define-custom-theme jao-mono-dark
   (:palette (fg unspecified "grey77")
             ;; (bg unspecified "#3f3f3f")
-            ;; (bg unspecified "#2f2f2f")
-            (bg unspecified "#222222")
+            ;; (bg unspecified "#0e1111")
+            (bg unspecified "#192021")
             (box "color-237" "grey25")
-            (button ((c 240) nul) ((c "lightskyblue1" "#4f4f4f")))
-            (hilite ((c nil "#505050")))
+            (button ((c 240) nul)
+                    ;; ((c "lightskyblue2" "#3f3f4f"))
+                    ((c "lightskyblue2" "#333436") nul))
+            (hilite ((c nil "#303336")))
             (strike-through ((c 237)) (st))
             (italic ((c 137) it) (it (c "lightyellow3")))
             ;; (link ((c 108) nul) ((c "#F0DFAF") nit nul))
@@ -15,23 +17,25 @@
             (visited-link ((c "burlywood3") nit nul))
             (tab-sel ((c 252 232) nbf))
             (tab-unsel ((c 245 232)))
-            ;; (comment ((c 102) it) ((c nil) :height 100
-            ;;                       :family "Inconsolata LGC" it))
-            (comment ((c 102) it) ((c "grey70") it))
-            (keyword ((c 151) nbf nul nit) ((c "darkseagreen3")))
-            (function ((c 115) nul nbf) ((c "palegreen3"))) ;; 108
+            (comment ((c 102) it) ((c "darkslategray4") it))
+            ;; (keyword ((c 151) nbf nul nit) ((c "darkseagreen3")))
+            ;; (function ((c 115) nul nbf) ((c "palegreen3")))
+            (keyword ((c 151) nbf nul nit) ((c "lightblue3")))
+            (function ((c 115) nul nbf) ((c "lightskyblue3")))
             (type ((c 72) nbf) ((c "honeydew3")))
             (variable-name ((c nil)))
             (constant ((c 72)) ((c "mediumaquamarine") nbf nit nul))
             ;; (constant ((c 72)) ((c "lightblue3")))
-            (string ((c 36)) ((c "cadetblue"))) ;; lightcyan3 ;; lemonchiffon3
+            (string ((c 36)) ((c "darkslategray3")))
+            ;; (string ((c 36)) ((c "light sea green")))
             (warning ((c 144)) ((c "#F0DFAF")))
             (error ((c 95)) ((c "goldenrod3")))
             ;; (dimm ((c 240)))
             (dimm ((c 59)) ((c "#6f6f6f")))
             (gnus-mail ((c "gray70" nil)))
             (gnus-news ((c "gray70" nil)))
-            (outline ((c "lemonchiffon3")))
+            ;; (outline ((c "aquamarine3")))
+            (outline ((c nil)))
             (f00 ((c 29)) ((c "darkseagreen")))
             (f01 ((c 108)) ((c "darkseagreen2")))
             (f02 ((c 102)) ((c "lightcyan4"))) ;; ((c "paleturquoise4"))
@@ -58,7 +62,9 @@
           (w3m-tab-line (c 0 0) ul)
           (widget-button (c 196))
           (widget-field (c 143 236)))
-  (:x-faces (diff-hl-change (c "#3f3f3f" "darkseagreen4"))
+  (:x-faces (company-scrollbar-bg (c nil "#383941"))
+            (company-scrollbar-fg (c nil "#484951"))
+            (diff-hl-change (c "#3f3f3f" "darkseagreen4"))
             (diff-hl-delete (c "#3f3f3f" "goldenrod4"))
             (diff-hl-insert (c "#3f3f3f" "cadetblue4"))
             (font-lock-doc-face (c "lightcyan3") it)
@@ -71,9 +77,10 @@
             (mode-line-inactive (c "grey50" "#3f3f3f"))
             (org-hide (c 0 nil))
             (show-paren-match (c "darkseagreen1" "#5f5f5f"))
-            (spaceline-modified (c "black" "lemonchiffon3") niv)
-            (spaceline-read-only (c "black" "lemonchiffon4") niv)
-            (spaceline-unmodified (c "white" "darkseagreen4") niv)
+            (spaceline-read-only (c "lightgoldenrod2" "gray10") niv)
+            (spaceline-modified (c "burlywood3" "gray10") nbf nit)
+            (spaceline-unmodified (c "darkseagreen" "gray10") niv)
+            (variable-pitch (c nil nil))
             (vertical-border (c "#3f3f3f") :inherit nil)
             (w3m-image (c "lightcyan2"))
             (w3m-tab-background (c nil nil))
diff --git a/themes/jao-themes.el b/themes/jao-themes.el
index 6641806..ad4bc0a 100644
--- a/themes/jao-themes.el
+++ b/themes/jao-themes.el
@@ -246,7 +246,7 @@
             (comint-highlight-input (p f01) nbf)
             (comint-highlight-prompt (p f00))
             (company-echo-common (p warning))
-            (company-scrollbar-bg (p warning))
+            (company-scrollbar-bg (p hilite))
             (company-scrollbar-fg (p warning))
             (company-tooltip (~ highlight))
             (company-tooltip-annotation (~ company-tooltip) it)
@@ -766,6 +766,10 @@
             (sh-quoted-exec (p f00))
             (show-paren-match (p hilite))
             (show-paren-mismatch (p error))
+            (slack-message-output-header (p f00))
+            (slack-message-output-text nil)
+            (slack-user-profile-header-face (p f01))
+            (slack-user-profile-property-name-face bf)
             (sldb-frame-line-face (p f00))
             (sldb-frame-label-face (p f01))
             (sldb-condition-face (p f02))
@@ -793,7 +797,7 @@
             (twittering-uri-face (~ link))
             (twittering-username-face (p f01)))
           `((underline nul))
-          `((variable-pitch :family ,jao-themes--face-family :height 11)
+          `((variable-pitch :family ,jao-themes--face-family :height 110)
             (vertical-border (c ,jao-themes--box nil) :inherit default))
           `((w3m-anchor link)
             (w3m-arrived-anchor vlink)
-- 
cgit v1.2.3