diff options
Diffstat (limited to 'Monitors/Cpu.hs')
-rw-r--r-- | Monitors/Cpu.hs | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/Monitors/Cpu.hs b/Monitors/Cpu.hs index 456add0..b3a125d 100644 --- a/Monitors/Cpu.hs +++ b/Monitors/Cpu.hs @@ -20,9 +20,6 @@ import qualified Data.ByteString.Lazy.Char8 as B cpuConfig :: IO MConfig cpuConfig = mkMConfig "Cpu: <total>" -- template - package -- package - "" -- usage tail? - [] -- added args ["total","user","nice","system","idle"] -- available replacements cpuData :: IO [Float] @@ -49,18 +46,8 @@ formatCpu x = list = t:x mapM (showWithColors f) . map (* 100) $ list -package :: String -package = "xmb-cpu" - runCpu :: [String] -> Monitor String runCpu _ = do c <- io $ parseCPU l <- formatCpu c parseTemplate l - -{- -main :: IO () -main = - do let af = runCpu [] - runMonitor cpuConfig af runCpu --} |