From f0d803e6fd0033f56e11436f2b1bca925abff526 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 7 Jan 2015 08:25:31 +0100
Subject: Theme tweaks

---
 themes/jao-light-theme.el | 35 +++++++++++++++++++++++------------
 themes/jao-themes.el      |  1 +
 2 files changed, 24 insertions(+), 12 deletions(-)

diff --git a/themes/jao-light-theme.el b/themes/jao-light-theme.el
index 0d03469..bf94c80 100644
--- a/themes/jao-light-theme.el
+++ b/themes/jao-light-theme.el
@@ -7,13 +7,14 @@
             (strike-through ((c 1)) (st))
 ;;            (italic ((c nil) it :family "DejaVu Sans Mono" :height 90))
 ;;            (italic ((c "darkslategray4")))
-            (italic (it))
+;;            (italic (it))
+            (italic (it :family "Inconsolata LGC" :height 90))
             (link ((c 22) nul nbf nit) ((c 29) nul nbf))
             (visited-link ((c 23) nul nbf))
             (tab-sel ((~ mode-line)))
             (tab-unsel ((~ mode-line-inactive)))
-            ;; (comment ((c nil) it :family "Inconsolata LGC" :height 80))
-            (comment ((c 241) it))
+            (comment ((c 241) it :family "Inconsolata LGC" :height 90))
+;;            (comment ((c 241) it))
 ;;            (keyword ((c 24 nil) nbf))
             (keyword ((c 24 nil) nbf))
             (type ((c 59) nbf nul nit) ((c 14) nbf))
@@ -28,9 +29,9 @@
             (gnus-mail ((c 232)) ((c 0)))
             (gnus-news ((c 232)) ((c 0)))
             (outline ((c 0)))
-            (f00 ((c 23))) ;; 14
-            (f01 ((c 24)))
-            (f02 ((c 30))) ;; 8
+            (f00 ((c 30)) ((c 23))) ;; 14
+            (f01 ((c 31)) ((c 24)))
+            (f02 ((c 37)) ((c 30))) ;; 8
             ;; (f00 ((c 8))) ;; 14
             ;; (f01 ((c 14)))
             ;; (f02 ((c 10))) ;; 8
@@ -38,7 +39,7 @@
             (f11 ((p f01)))
             (f12 ((p f02))))
   (:faces (bold bf)
-          (button (c 23) nul nbf)
+          (button (c 31) nul nbf)
           (company-tooltip-common (c 1 6) nbf)
           (company-tooltip-common-selection (~ company-tooltip-selection)
                                             (c nil 6) bf)
@@ -53,6 +54,10 @@
           (mode-line (c 0 "grey90") nbf nul)
           (mode-line-inactive (c 11 "grey90") nbf nul)
           (org-hide (c 15 15))
+          (powerline-active1 (c "black" "grey85"))
+          (powerline-active2 (c "grey5" "grey80"))
+          (powerline-inactive1 (c "grey20" "grey95"))
+          (powerline-inactive2 (c "grey20" "grey90"))
           (vertical-border (c 252 nil) :inherit nil)
           (w3m-tab-selected (c 9 nil) bf)
           (w3m-link-numbering (c 12))
@@ -65,16 +70,22 @@
             (compilation-info (c 14 nil) nbf)
             (cursor (c 1 1))
             (diary (p error) nbf)
-            (diff-hl-change (c "white" "light goldenrod yellow"))
+            (diff-hl-change (c "white" "moccasin"))
             (diff-hl-insert (c "white" "honeydew2"))
-            (diff-hl-delete (c "white" "moccasin"))
+            (diff-hl-delete (c "white" "tan2"))
             (fringe (c "grey70" nil))
             (gnus-summary-selected (c 2) nbf)
             (gnus-summary-cancelled (c 1) st)
             (header-line (c nil "#efebe7"))
-            (mode-line (c "grey15" 7) :box (:line-width -1 :color "grey90"))
-            (mode-line-inactive (c "grey30" "grey97")
-                                :box (:line-width -1 :color "grey90"))
+            ;; (mode-line (c "grey15" 7) :box (:line-width -1 :color "grey90"))
+            ;; (mode-line-inactive (c "grey30" "grey97")
+            ;;                     :box (:line-width -1 :color "grey90"))
+            (mode-line (c "grey10" "grey85") :box nil)
+            (mode-line-inactive (c "grey30" "grey95") :box nil)
+            (powerline-active1 (c "black" "grey85"))
+            (powerline-active2 (c "grey5" "grey80"))
+            (powerline-inactive1 (c "grey20" "grey95"))
+            (powerline-inactive2 (c "grey20" "grey90"))
             (org-hide (c "white" "white"))
             (vertical-border (c "grey70" nil))
             (w3m-image (c "midnightblue" "azure2"))
diff --git a/themes/jao-themes.el b/themes/jao-themes.el
index 1dfbb93..26bd15a 100644
--- a/themes/jao-themes.el
+++ b/themes/jao-themes.el
@@ -507,6 +507,7 @@
             (info-title-2 (~ outline-2) bf)
             (info-title-3 (~ outline-3) bf)
             (info-title-4 (~ outline-4) bf)
+            (Info-quoted (p f01))
             (info-xref link)
             (info-xref-visited vlink)
             (isearch bf (p hilite))
-- 
cgit v1.2.3