diff options
| author | jao <jao@gnu.org> | 2020-09-22 18:41:01 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-09-22 18:41:01 +0100 |
| commit | 23610c5e372d1ca21fe235284553a33edb433588 (patch) | |
| tree | abb62a87267a4d8d84adb20eb021051f452c5910 /src/lib | |
| parent | e95069d45ca286be558279bef7e6803c3db0cd4d (diff) | |
| download | xmobar-config-23610c5e372d1ca21fe235284553a33edb433588.tar.gz xmobar-config-23610c5e372d1ca21fe235284553a33edb433588.tar.bz2 | |
simpler top bar for exwm (music on emacs)
Diffstat (limited to 'src/lib')
| -rw-r--r-- | src/lib/Monitors.hs | 5 | ||||
| -rw-r--r-- | src/lib/Music.hs | 4 |
2 files changed, 6 insertions, 3 deletions
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs index 99cd1ce..864088a 100644 --- a/src/lib/Monitors.hs +++ b/src/lib/Monitors.hs @@ -49,7 +49,7 @@ topProc' p = TopProc (p <~> ["-t" , "<mboth1> <mboth2> <mboth3> \ , "-w", "10", "-L" , "10", "-H", "80"]) 15 wireless p n = Wireless n (p >~< ["-t" , fc (pLow p) (fni "\xf1eb " ++ "<essid>") - -- <quality> + -- <quality>\xf09e , "-W", "5", "-M", "15" , "-m", "3" , "-L", "20", "-H", "80"]) 20 @@ -174,7 +174,10 @@ mail p = MailX [ ("I", "jao/inbox", pHigh p) masterVol p = Volume "default" "Master" ["-t", "<status> <volume>" + -- "<status> " ++ fni "<volumebar>" ++ " <volume>" + -- , "-W", "0", "-f", "\xf026\xf026\xf027\xf027\xf028\xf028\xf028" , "--", "-C", pForeground p, "-c", "sienna4" + -- , "-O", "" , "-O", fni "\xf025" -- "\xf130" -- fn 2 "🎧" , "-o", fn 4 "🔇" ] 10 diff --git a/src/lib/Music.hs b/src/lib/Music.hs index 39682bf..13a52a2 100644 --- a/src/lib/Music.hs +++ b/src/lib/Music.hs @@ -3,12 +3,12 @@ module Music where import Xmobar import Monitors import qualified Bottom -import Config (defaultHeight, pIsLight, pHigh, fc) +import Config (defaultHeight, pIsLight, pHigh, fc, fni) import GMPDP (GMPDP(..)) mpris p client width = Mpris2 client - ["-t", "<tracknumber> <title> " ++ fc (pHigh p) "<artist>" + ["-t", fni "\xf1bc" ++ " <tracknumber> <title> " ++ fc (pHigh p) "<artist>" ++ " <album> <length> <composer>" , "-T", show width, "-E", "…", "-M", "100", "-x", ""] 40 |