From 68f2f5fc251c611c3848c0810fd303e655860038 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 14 Oct 2019 00:48:46 +0100
Subject: better dark colors

---
 src/lib/Config.hs | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

(limited to 'src/lib/Config.hs')

diff --git a/src/lib/Config.hs b/src/lib/Config.hs
index 8f05a88..59d9f3d 100644
--- a/src/lib/Config.hs
+++ b/src/lib/Config.hs
@@ -17,6 +17,7 @@ data Palette = Palette { pNormal :: String
                        , pBackground :: String
                        , pAlpha :: Int
                        , pIconRoot :: String
+                       , pIsLight :: Bool
                        }
 
 lightTheme :: IO Bool
@@ -32,19 +33,21 @@ lightPalette = Palette { pNormal = "black"
                        , pBackground = "white"
                        , pAlpha = 255
                        , pIconRoot = "/home/jao/.xmobar/icons/light"
+                       , pIsLight = True
                        }
 
 darkPalette :: Palette
-darkPalette = Palette { pNormal = "grey60"
-                      , pLow = "gray50"
+darkPalette = Palette { pNormal = "gray77"
+                      , pLow = "gray60"
                       , pHigh = "#a0522d"
-                      , pFont = "xft:Source Code Pro Medium-10"
+                      , pFont = "xft:Source Code Pro Medium-9"
                       -- , pFont = "xft:NotoMono-9,xft:Inconsolata-11"
                       , pBorder = "grey30"
-                      , pForeground = "grey60"
-                      , pBackground = "black"
-                      , pAlpha = 0
+                      , pForeground = "grey77" -- "grey60"
+                      , pBackground = "#2B2B2B" -- "black"
+                      , pAlpha = 255
                       , pIconRoot = "/home/jao/.xmobar/icons/dark"
+                      , pIsLight = False
                       }
 
 palette :: IO Palette
-- 
cgit v1.2.3