summaryrefslogtreecommitdiffhomepage
path: root/src/lib/MPD.hs
blob: da0f954dbdae04a3c5095da9f6390f2bf25aeb08 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
module MPD where

import Xmobar
import Config (palette, defaultHeight)
import qualified Bottom (config)

mpd = MPD [ "-W", "12", "-b", "░", "-f", "▒", "-t"
          , " <lapsed> <fc=seashell3><fn=1><bar></fn></fc>"] 10

autoMPD = AutoMPD [ "-T", "160", "-E", "...", "-W", "10", "-t"
                  , "<length> <ppos>/<plength> \
                    \<fn=0><fc=darkolivegreen><title></fc></fn> \
                    \<fn=0><album></fn> \
                    \<fn=0><fc=dodgerblue4><artist></fc> \
                    \<fc=burlywood4><composer></fc> <date></fn>"]


config p = (Bottom.config [(Run mpd), (Run autoMPD)] p) {
  template =  "|kbd||default:Master| |default:Capture| \
              \|mpd| |autompd| {} |mbox| \
              \|EGPH| \
              \|diskio| |disku| · |bright| · |coretemp| \
              \|memory| · |uptime| |b0| "
  , additionalFonts = ["xft:Hack-7"]
  , textOffsets = [defaultHeight - 7]
  }