From 8df47403a0f5ed1a3ef853e25868fa305b2f3a1b Mon Sep 17 00:00:00 2001
From: Josh Rahm <rahm@google.com>
Date: Thu, 21 Apr 2022 17:04:08 -0600
Subject: Some changes to XMobar look and feel

---
 src/Rahm/Desktop/XMobarLog.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Rahm/Desktop/XMobarLog.hs')

diff --git a/src/Rahm/Desktop/XMobarLog.hs b/src/Rahm/Desktop/XMobarLog.hs
index 637670e..d0dcc4f 100644
--- a/src/Rahm/Desktop/XMobarLog.hs
+++ b/src/Rahm/Desktop/XMobarLog.hs
@@ -46,7 +46,7 @@ xMobarLogHook (XMobarLog xmproc) = do
     hPutStrLn xmproc $ trunc 80 $ execWriter $ do
       tell " "
       tell layoutXpm
-      tell $ "  "
+      tell $ "   "
 
       forM_ wss $ \(t, ws) -> do
         case t of
@@ -57,7 +57,7 @@ xMobarLogHook (XMobarLog xmproc) = do
         tell $ toAction $ S.tag ws
         tell " </fc></fn>"
 
-      tell $ " <fc=#a0a0a0><fn=3>"
+      tell $ "   <fc=#ff8888><fn=3>"
       tell $ title
       tell $ "</fn></fc>"
 
-- 
cgit