diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Single.hs | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/src/Single.hs b/src/Single.hs index 2119c6d..707cc15 100644 --- a/src/Single.hs +++ b/src/Single.hs @@ -1,6 +1,7 @@ import Xmobar import Config import Monitors +import Music (mpdMon) topProcL p s = TopProc (p <~> args) 15 where temp | s = "<both1> <both2> <both3> ยท <mboth1> <mboth2> <mboth3>" @@ -27,13 +28,12 @@ config p = (baseConfig p) { , bgColor = if pIsLight p then "#f0f0f0" else "black" , alpha = 233 , border = FullB - , textOffsets = [] , textOffset = 0 , iconOffset = 0 , dpi = 0 -- , font = "Source Code Pro, Noto Color Emoji Regular 9, Regular 9" - , font = "DejaVu Sans Mono, Noto Color Emoji 9, Regular 9" - -- , font = "Hack, Noto Color Emoji Regular 9, Light 9" + -- , font = "DejaVu Sans Mono, Noto Color Emoji 9, Regular 9" + , font = "Hack, Noto Color Emoji Regular 9, Light 9" , commands = [ Run (topProcL p isXmonad) , Run (load p) , Run (iconBatt p) @@ -51,10 +51,12 @@ config p = (baseConfig p) { -- , Run captureVol , Run (masterAlsa p) , Run captureAlsa - , Run laTime +-- , Run laTime , Run localTime , Run (cpuFreq' p) , Run (weather "EGPH" p) + , Run mpdMon +-- , edinWeather ] ++ extraCmds , template = trayT ++ " |batt0| " @@ -67,6 +69,8 @@ config p = (baseConfig p) { ++ " |alsa:default:Master| " ++ dimi "\xf130" ++ " |alsa:default:Capture|" ++ "</action>" ++ " |EGPH|" + ++ " |mpd|" +-- ++ " |wttr|" ++ mail ++ " |kbd| " ++ eLog p @@ -79,7 +83,7 @@ config p = (baseConfig p) { ++ dimi "\xf080" ++ " |memory| " ++ dimi "\xf0a0" ++ "|diskio| |disku| " ++ " |datetime| " - ++ " |laTime| " +-- ++ " |laTime| " } where dimi = fc "grey40" . fn 1 isXmonad = pWm p == Just "xmonad" trayT = if isXmonad then "|tray|" else "" |