diff options
| -rw-r--r-- | src/TopC.hs | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/src/TopC.hs b/src/TopC.hs index f9472da..01615f5 100644 --- a/src/TopC.hs +++ b/src/TopC.hs @@ -24,14 +24,22 @@ mpd a p i = mpdMon = mpd "mpd" "6600" "\xf001" mopMon = mpd "mopidy" "6669" "\xf1bc" +mail' p = MailX [ ("J", "jao", pHigh p) + , ("B", "bigml", pHigh p) + , ("F", "feeds", pLow p)] + [ "-d", "~/var/mail" , "-s", " "] "mail" + + config p = (baseConfig p) { position = TopSize C 100 (defaultHeight - 1) , textOffset = defaultHeight - 8 , textOffsets = [defaultHeight - 9, defaultHeight - 9, defaultHeight - 6, defaultHeight - 8, defaultHeight - 8, defaultHeight - 8] + , alpha = 192 , border = FullB , commands = [ Run (topProcL p) + , Run (mail' p) , Run (iconBatt p) , Run mpdMon , Run (NamedXPropertyLog "_EMACS_LOG" "elog") @@ -52,9 +60,10 @@ config p = (baseConfig p) { , Run laTime , Run localTime , Run w -- LEGE, LEBL, KCV0 +-- , Run (mpris p "playerctld" 20) ] , template = "|tray| " - ++ "|batt0| " + ++ " |batt0| " ++ dimi "\xf26c" ++ " |bright| " ++ "<action=`toggle-app.sh nm-applet`>" ++ " |wg-mullvad||tun0||wlp164s0wi|" @@ -64,10 +73,12 @@ config p = (baseConfig p) { ++ " |default:Master| " ++ dimi "\xf130" ++ " |default:Capture|" ++ "</action> " ++ "|mpd|" +-- ++ " |mpris2| " ++ " |EGPH| " ++ fc (pHigh p) "|elog|" ++ " {} " ++ "|kbd| " + ++ "|mail| " ++ "|multicpu| " ++ "|multicoretemp| " ++ " |top| " |