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.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/lib/Music.hs b/src/lib/Music.hs
index fa6e278..304a1fc 100644
--- a/src/lib/Music.hs
+++ b/src/lib/Music.hs
@@ -5,14 +5,14 @@ import Monitors
import qualified Bottom
import Config (defaultHeight)
-mpris client =
+mpris client width =
Mpris2 client -- "clementine" --
["-t", " <fn=0><tracknumber>\
\ <title> <fc=sienna4><artist></fc>\
\ <album> <length></fn>"
- , "-T", "165", "-E", "...", "-M", "100", "-x", ""] 10
+ , "-T", show width, "-E", "...", "-M", "100", "-x", ""] 10
-mprisConfig client p = Bottom.config [Run (mpris client)] "|mpris2|" p
+mprisConfig client p = Bottom.config [Run (mpris client 165)] "|mpris2|" p
mpd = MPD [ "-W", "12", "-b", "░", "-f", "▒", "-t"
, " <lapsed> <fc=honeydew3><fn=5><bar></fn></fc>"] 10 -- fn=5
@@ -31,7 +31,7 @@ mpdConfig p = (Bottom.config [Run mpd, Run (autoMPD "150")] "|mpd| |autompd|" p)
}
compMPD = concatMonitor " " mpd (autoMPD "150")
-alt x = altMonitor (mpris x) compMPD
+alt x = altMonitor (mpris x 165) compMPD
config cl =
if cl == "mpd"