diff options
author | jao <jao@gnu.org> | 2019-10-14 00:48:46 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2019-10-14 00:48:46 +0100 |
commit | 68f2f5fc251c611c3848c0810fd303e655860038 (patch) | |
tree | c63a507fadfd599b339c98b37aaabb64dea1ff61 /src/TopC.hs | |
parent | e0cb3b4e09b5367a1b330f1de508e0452ed60db8 (diff) | |
download | xmobar-config-68f2f5fc251c611c3848c0810fd303e655860038.tar.gz xmobar-config-68f2f5fc251c611c3848c0810fd303e655860038.tar.bz2 |
better dark colors
Diffstat (limited to 'src/TopC.hs')
-rw-r--r-- | src/TopC.hs | 22 |
1 files changed, 14 insertions, 8 deletions
diff --git a/src/TopC.hs b/src/TopC.hs index a86c542..54c3bb8 100644 --- a/src/TopC.hs +++ b/src/TopC.hs @@ -16,8 +16,15 @@ autoMPD = AutoMPD [ "-T", "110", "-E", "…", "-W", "10", "-t" \<fn=0><fc=dodgerblue4><artist></fc> \ \<fc=burlywood4><composer></fc> <date></fn>"] -compMPD = concatMonitor " " mpd autoMPD -music = toggleMonitor "/tmp/mpris.st" (mpris "spotify") compMPD +autoMPDD = AutoMPD [ "-T", "110", "-E", "…", "-W", "10", "-t" + , "<ppos>/<plength> \ + \<fn=0><title></fn> \ + \<fn=0><fc=darkseagreen><album></fc></fn> \ + \<fn=0><fc=darkseagreen4><artist></fc> \ + \<fc=burlywood4><composer></fc> <date></fn>"] + +compMPD light = concatMonitor " " mpd (if light then autoMPD else autoMPDD) +music light = toggleMonitor "/tmp/mpris.st" (mpris "spotify" 120) (compMPD light) -- <fn=1> 💡 </fn> config p = (baseConfig p) { @@ -28,7 +35,7 @@ config p = (baseConfig p) { , border = BottomB , alpha = 255 , commands = [ Run (topProcL p) - , Run music + , Run m , Run (cpuBars p) , Run memory , Run (diskU p) @@ -39,7 +46,7 @@ config p = (baseConfig p) { , Run (wireless p "wlp1s0") , Run (dynNetwork p) , Run tun0 - , Run (weather "EGPH") -- LEGE, LEBL, KCV0 + , Run (weather "EGPH" p) -- LEGE, LEBL, KCV0 , Run mail , Run masterVol , Run captureVol @@ -49,16 +56,15 @@ config p = (baseConfig p) { , template = " |batt0| |bright|\ \ <action=`toggle-app.sh nm-applet`>|tun0||wlp1s0wi|</action> \ \ |dynnetwork| \ - \ <action=`toggle-app.sh blueman-tray`></action>\ - \<action=`toggle-app.sh pasystray`>|default:Master|\ + \ <action=`toggle-app.sh pasystray`>|default:Master|\ \ |default:Capture|</action> |EGPH|\ \ |mail| <fn=1>|kbd|</fn>{}\ - \ <action=`toggle-pipe.sh /tmp/mpris.st`>|" ++ (alias music) ++ + \ <action=`toggle-pipe.sh /tmp/mpris.st`>|" ++ (alias m) ++ "|</action>\ \ |multicpu| |top| |memory|\ \ |diskio| |disku| \ \ <fn=2>🕓 </fn>|datetime| |laTime| " -} + } where m = music (pIsLight p) main :: IO () main = |