summaryrefslogtreecommitdiffhomepage
path: root/src/lib/Music.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/Music.hs')
-rw-r--r--src/lib/Music.hs19
1 files changed, 10 insertions, 9 deletions
diff --git a/src/lib/Music.hs b/src/lib/Music.hs
index 949f13d..fa6e278 100644
--- a/src/lib/Music.hs
+++ b/src/lib/Music.hs
@@ -15,21 +15,22 @@ mpris client =
mprisConfig client p = Bottom.config [Run (mpris client)] "|mpris2|" p
mpd = MPD [ "-W", "12", "-b", "░", "-f", "▒", "-t"
- , " <lapsed> <fc=honeydew3><fn=5><bar></fn></fc>"] 10
+ , " <lapsed> <fc=honeydew3><fn=5><bar></fn></fc>"] 10 -- fn=5
-autoMPD = AutoMPD [ "-T", "150", "-E", "...", "-W", "10", "-t"
- , "<length> <ppos>/<plength> \
- \<fn=0><fc=darkolivegreen><title></fc></fn> \
- \<fn=0><album></fn> \
- \<fn=0><fc=dodgerblue4><artist></fc> \
- \<fc=burlywood4><composer></fc> <date></fn>"]
-mpdConfig p = (Bottom.config [Run mpd, Run autoMPD] "|mpd| |autompd|" p)
+autoMPD l = AutoMPD [ "-T", l, "-E", "...", "-W", "10", "-t"
+ , "<length> <ppos>/<plength> \
+ \<fn=0><fc=darkolivegreen><title></fc></fn> \
+ \<fn=0><album></fn> \
+ \<fn=0><fc=dodgerblue4><artist></fc> \
+ \<fc=burlywood4><composer></fc> <date></fn>"]
+
+mpdConfig p = (Bottom.config [Run mpd, Run (autoMPD "150")] "|mpd| |autompd|" p)
{
textOffsets = [defaultHeight - 7, defaultHeight - 6]
}
-compMPD = concatMonitor " " mpd autoMPD
+compMPD = concatMonitor " " mpd (autoMPD "150")
alt x = altMonitor (mpris x) compMPD
config cl =