summaryrefslogtreecommitdiffhomepage
path: root/src/lib/Music.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-01-27 23:12:27 +0000
committerjao <jao@gnu.org>2019-01-27 23:12:27 +0000
commit09141b9a589404fbfa1fabb34c458c7d03edd3f9 (patch)
tree04b3879beaf501304e7c9c07ebe34dfa3a60b194 /src/lib/Music.hs
parent78bcb8c73ffb1b09b379ea0bbd7e68f2d84e187e (diff)
downloadxmobar-config-09141b9a589404fbfa1fabb34c458c7d03edd3f9.tar.gz
xmobar-config-09141b9a589404fbfa1fabb34c458c7d03edd3f9.tar.bz2
Using monitor combiners to auto-switch mpd/mpris
Diffstat (limited to 'src/lib/Music.hs')
-rw-r--r--src/lib/Music.hs16
1 files changed, 16 insertions, 0 deletions
diff --git a/src/lib/Music.hs b/src/lib/Music.hs
new file mode 100644
index 0000000..480d419
--- /dev/null
+++ b/src/lib/Music.hs
@@ -0,0 +1,16 @@
+module Music where
+
+import Xmobar
+import Mpris
+import MPD
+import Monitors
+import qualified Bottom
+
+compMPD = concatMonitor " " mpd autoMPD
+
+alt x = altMonitor (Mpris.mpris x) compMPD
+
+config cl =
+ if cl == "mpd"
+ then MPD.config
+ else Bottom.config [Run (alt cl)] "|mpris2_mpd_autompd|"