diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Single.hs | 28 | 
1 files changed, 18 insertions, 10 deletions
| diff --git a/src/Single.hs b/src/Single.hs index 891380b..2119c6d 100644 --- a/src/Single.hs +++ b/src/Single.hs @@ -8,7 +8,12 @@ topProcL p s = TopProc (p <~> args) 15                              ++ "ยท  <mboth1>  <mboth2>  <mboth3>  <mboth4>"          args = ["-t", temp, "-w", "12", "-L" , "10", "-H", "80"] -diskIOS p = DiskIO [("/", "<read> <write>")] (diskArgs p) 10 +diskIOS p = DiskIO [("/", "<total>"), ("/home", "<total>")] (diskArgs p) 10 + +diskU' p = +  DiskU [("/", "/ <free>"), ("/var", "/v <free>") ,("/home", "/h <free>")] +        (p >~< ["-L", "20", "-H", "70", "-m", "1", "-p", "3"]) +        20  cpuFreq' p = CpuFreq (p <~> args) 50    where args = ["-t" , "<avg>" , "-L", "1", "-H", "2", "-d", "2"] @@ -32,18 +37,20 @@ config p = (baseConfig p) {    , commands = [ Run (topProcL p isXmonad)                 , Run (load p)                 , Run (iconBatt p) -               , Run (cpuBars p) +--               , Run (cpuBars p)                 , Run memory' -               , Run (diskU p) +               , Run (diskU' p)                 , Run (diskIOS p)                 , Run (kbd p)                 , Run (coreTemp p)                 , Run (wireless p "wlan0")                 , Run (dynNetwork p) -               , Run (vpnMark "wg-mullvad") -               , Run tun0 -               , Run (masterVol p) -               , Run captureVol +--               , Run (vpnMark "wg-mullvad") +--               , Run tun0 +--               , Run (masterVol p) +--               , Run captureVol +               , Run (masterAlsa p) +               , Run captureAlsa                 , Run laTime                 , Run localTime                 , Run (cpuFreq' p) @@ -52,11 +59,12 @@ config p = (baseConfig p) {    , template = trayT               ++ " |batt0| "               ++ "<action=`toggle-app.sh nm-applet`>" -             ++ "  <fc=#000000>|wg-mullvad||tun0||wlan0wi|</fc>" +             ++ "  <fc=#000000>|wlan0wi|</fc>"               ++ "</action>"               ++ " |dynnetwork| "               ++ "<action=`toggle-app.sh pasystray`>" -             ++ "  |default:Master| " ++ dimi "\xf130" ++ " |default:Capture|" +--             ++ "  |default:Master| " ++ dimi "\xf130" ++ " |default:Capture|" +             ++ "  |alsa:default:Master| " ++ dimi "\xf130" ++ " |alsa:default:Capture|"               ++ "</action>"               ++ "    |EGPH|"               ++ mail @@ -64,7 +72,7 @@ config p = (baseConfig p) {               ++ eLog p               ++ "{"               ++ "}" -             -- ++ "|multicpu|" +--             ++ "|multicpu|"               ++ "  |cpufreq|"               ++ " |multicoretemp|"               ++ "  |top|   " | 
