diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Single.hs | 7 | 
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Single.hs b/src/Single.hs index 1ea4a38..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>" @@ -50,10 +51,11 @@ 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 @@ -67,6 +69,7 @@ config p = (baseConfig p) {               ++ "  |alsa:default:Master| " ++ dimi "\xf130" ++ " |alsa:default:Capture|"               ++ "</action>"               ++ "    |EGPH|" +             ++ "  |mpd|"  --             ++ "  |wttr|"               ++ mail               ++ " |kbd| " @@ -80,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 ""  | 
