summaryrefslogtreecommitdiffhomepage
path: root/src/Mpris.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Mpris.hs')
-rw-r--r--src/Mpris.hs20
1 files changed, 20 insertions, 0 deletions
diff --git a/src/Mpris.hs b/src/Mpris.hs
new file mode 100644
index 0000000..09c155d
--- /dev/null
+++ b/src/Mpris.hs
@@ -0,0 +1,20 @@
+import Xmobar
+import Config (palette)
+import qualified Bottom (config)
+
+mpris =
+ Mpris2 "spotify" -- "clementine" --
+ ["-t", " <tracknumber>\
+ \ <title> <fc=sienna4><artist></fc>\
+ \ <album> <length>"
+ , "-T", "180", "-E", "...", "-M", "100", "-x", ""] 10
+
+config p = (Bottom.config [Run mpris] p) {
+ template = "|kbd||default:Master| |default:Capture| \
+ \|mpris2| {} |mbox| \
+ \|EGPH| \
+ \|diskio| |disku| · |bright| · |coretemp| \
+ \|memory| · |uptime| |b0| "
+ }
+main :: IO ()
+main = palette >>= xmobar . config