blob: 09c155d53f6d1d2f39dedcfe184ae2f3e7c920fb (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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
|