From df36230da4d10d32758736d30eab0fd2073f0578 Mon Sep 17 00:00:00 2001
From: Andrea Rossato <andrea.rossato@ing.unitn.it>
Date: Wed, 11 Jul 2007 18:50:35 +0200
Subject: removed from monitors code not used anymore

darcs-hash:20070711165035-d6583-e556a6910bf8deb91677a5d590eb45f157a400d7.gz
---
 Monitors/Mem.hs | 13 -------------
 1 file changed, 13 deletions(-)

(limited to 'Monitors/Mem.hs')

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
--}
-- 
cgit v1.2.3