diff options
Diffstat (limited to 'src/TopC.hs')
-rw-r--r-- | src/TopC.hs | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/src/TopC.hs b/src/TopC.hs index 4941adb..1adef23 100644 --- a/src/TopC.hs +++ b/src/TopC.hs @@ -4,7 +4,7 @@ import Monitors import Music (mpris, gpmd, mpdt) topProcL p = TopProc (p <~> ["-t" - , "<both1> <both2> <both3> <mboth1> <mboth2> " + , "<both1> <both2> <both3> <mboth1> <mboth2> <mboth3>" , "-w", "10", "-L" , "10", "-H", "80"]) 15 diskIOL p = DiskIO [("/", "<totalbipat>"), ("/home", "<totalbipat>")] (diskArgs p) 10 @@ -19,9 +19,13 @@ ompd light = where tm = " <remaining> " ++ mpdt light compMPD light = concatMonitor " " mpd (autoMPD light) -mpn = "spotify" +mpn = "spotifyd" -- music light = toggleMonitor "/tmp/mpris.st" (mpris mpn 120) (autoMPD light) -music = ompd +-- music = ompd +-- music l = toggleMonitor "/tmp/mpris.st" (ompd l) (mpris mpn 120) +-- musicPipe = MarqueePipeReader "/tmp/music" (20, 10, "..") "musicpipe" +musicPipe = PipeReader "/tmp/music" "musicpipe" +music l = toggleMonitor "/tmp/mpris.st" musicPipe (ompd l) -- <fn=1> 💡 </fn> config p = (baseConfig p) { @@ -33,7 +37,8 @@ config p = (baseConfig p) { , alpha = 255 , commands = [ Run (topProcL p) , Run m --- , Run (mail p) + , Run (thinkTemp p) + , Run (mail p) , Run (cpuBars p) , Run memory , Run (diskU p) @@ -54,19 +59,20 @@ config p = (baseConfig p) { ++ "|bright| " ++ "<action=`toggle-app.sh nm-applet`>|proton0||wlp1s0wi|</action> " ++ "|dynnetwork| " --- ++ "|mail| " ++ "<action=`toggle-app.sh pasystray`>|default:Master| \ \|default:Capture|</action> " ++ "<action=`toggle-pipe.sh /tmp/mpris.st`>|" ++ ma ++ "|</action>" ++ fn 1 " |kbd|" ++ " {} " - ++ " |multicpu| " + ++ "|mail|" + ++ "|multicoretemp| " + ++ "|multicpu| " ++ " |top| " ++ "|memory| " ++ fc "grey60" "|diskio|" ++ " |disku| " ++ " |EGPH| " ++ fn 2 "🕓 " ++ "|datetime| |laTime| " - } where m = music (pIsLight p) + } where m = music (pIsLight p) -- ompd (pIsLight p) -- (mpris mpn 120) -- ma = alias m w = (weather' "<skyConditionS> <tempC>° <weather>" "EGPH" p) |