From c94a9349d25394726456efc8b1dbcca8385b1b77 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sat, 13 Aug 2022 05:43:40 +0100
Subject: xmobar-single: tidy-ups galore

---
 src/lib/Music.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'src/lib/Music.hs')

diff --git a/src/lib/Music.hs b/src/lib/Music.hs
index 13a52a2..a2698c9 100644
--- a/src/lib/Music.hs
+++ b/src/lib/Music.hs
@@ -30,6 +30,13 @@ mpdt light =
 autoMPD l lgt =
   AutoMPD [ "-T", l, "-E", "…", "-W", "10", "-t", "<length> " ++ mpdt lgt]
 
+mpdx a p i =
+  MPDX [ "-W", "12", "-b", "░", "-f", "▒", "-t", "<statei> <remaining>"
+       , "--", "-p", p, "-P", fni "\xf144", "-Z", fni i, "-S", fni i] 20 a
+
+mpdMon = mpdx "mpd" "6600" "\xf001"
+mopMon = mpdx "mopidy" "6669" "\xf1bc"
+
 mpdConfig p =
   (Bottom.config [Run mpd, Run (autoMPD "150" (pIsLight p))] "|mpd| |autompd|" p)
   {
-- 
cgit v1.2.3