From fb73fdfc8dc9162165787fd2060363333145b069 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sun, 19 Jul 2020 03:47:32 +0100
Subject: volume foreground colour

---
 src/lib/Bottom.hs   | 2 +-
 src/lib/Monitors.hs | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

(limited to 'src')

diff --git a/src/lib/Bottom.hs b/src/lib/Bottom.hs
index e4302ab..5b2b6c9 100644
--- a/src/lib/Bottom.hs
+++ b/src/lib/Bottom.hs
@@ -27,7 +27,7 @@ config cs tpl p = (baseConfig p) {
                , Run (weather "EGPH" p) -- LEGE, LEBL, KCV0
                , Run trayPadding
                , Run (mail p)
-               , Run masterVol
+               , Run (masterVol p)
                , Run captureVol
                , Run laTime
                , Run localTime
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs
index b1c7a1d..a7dbf9a 100644
--- a/src/lib/Monitors.hs
+++ b/src/lib/Monitors.hs
@@ -152,10 +152,10 @@ mail p = MailX [ ("I", "jao/inbox", pHigh p)
                ["-d", "~/var/mail", "-p", " ", "-s", " "]
                "mail"
 
-masterVol =
+masterVol p =
   Volume "default" "Master"
                   ["-t", "<status> <volume>"
-                  , "--", "-C", "black", "-c", "sienna4"
+                  , "--", "-C", pForeground p, "-c", "sienna4"
                   , "-O", fn 2 "🎧"
                   , "-o", fn 4 "🔇"] 10
 
-- 
cgit v1.2.3