summaryrefslogtreecommitdiffhomepage
path: root/src/lib/Music.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-12-05 01:16:59 +0000
committerjao <jao@gnu.org>2019-12-05 01:18:20 +0000
commit318ce5d54950aea41bb2f3bfce73658a03bc691a (patch)
treebd0b72a721ab80aa3851fd255d3ec3a7bcacdee8 /src/lib/Music.hs
parent413dde1f9a12da0449cd4356f3ff7566cd812ec9 (diff)
downloadxmobar-config-318ce5d54950aea41bb2f3bfce73658a03bc691a.tar.gz
xmobar-config-318ce5d54950aea41bb2f3bfce73658a03bc691a.tar.bz2
little tweaks for xmobar-exwm
Diffstat (limited to 'src/lib/Music.hs')
-rw-r--r--src/lib/Music.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lib/Music.hs b/src/lib/Music.hs
index 304a1fc..0fdb87c 100644
--- a/src/lib/Music.hs
+++ b/src/lib/Music.hs
@@ -4,6 +4,7 @@ import Xmobar
import Monitors
import qualified Bottom
import Config (defaultHeight)
+import GMPDP (GMPDP(..))
mpris client width =
Mpris2 client -- "clementine" --
@@ -33,6 +34,8 @@ mpdConfig p = (Bottom.config [Run mpd, Run (autoMPD "150")] "|mpd| |autompd|" p)
compMPD = concatMonitor " " mpd (autoMPD "150")
alt x = altMonitor (mpris x 165) compMPD
+gpmd = Run (GMPDP "gmpdp")
+
config cl =
if cl == "mpd"
then mpdConfig