diff options
Diffstat (limited to 'Monitors/Mem.hs')
-rw-r--r-- | Monitors/Mem.hs | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/Monitors/Mem.hs b/Monitors/Mem.hs index b65715d..dd132a7 100644 --- a/Monitors/Mem.hs +++ b/Monitors/Mem.hs @@ -19,9 +19,6 @@ import Monitors.Common memConfig :: IO MConfig memConfig = mkMConfig "Mem: <usedratio>% (<cache>M)" -- template - package -- package - "" -- usage tail? - [] -- added args ["total", "free", "buffer", -- available replacements "cache", "rest", "used", "usedratio"] @@ -43,18 +40,8 @@ formatMem x = do let f n = show (takeDigits 2 n) mapM (showWithColors f) x -package :: String -package = "xmb-mem" - runMem :: [String] -> Monitor String runMem _ = do m <- io $ parseMEM l <- formatMem m parseTemplate l - -{- -main :: IO () -main = - do let af = runMem [] - runMonitor monitorConfig af runMem --} |