diff options
| author | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-07-11 18:50:35 +0200 |
|---|---|---|
| committer | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-07-11 18:50:35 +0200 |
| commit | df36230da4d10d32758736d30eab0fd2073f0578 (patch) | |
| tree | 490f0c447afc6a3c5b157dd012460fb3866fd358 /Monitors/Batt.hs | |
| parent | 3fff39ac86711de214bbe8a7947296eca2b3fbfb (diff) | |
| download | xmobar-df36230da4d10d32758736d30eab0fd2073f0578.tar.gz xmobar-df36230da4d10d32758736d30eab0fd2073f0578.tar.bz2 | |
removed from monitors code not used anymore
darcs-hash:20070711165035-d6583-e556a6910bf8deb91677a5d590eb45f157a400d7.gz
Diffstat (limited to 'Monitors/Batt.hs')
| -rw-r--r-- | Monitors/Batt.hs | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/Monitors/Batt.hs b/Monitors/Batt.hs index df288d8..2a81e12 100644 --- a/Monitors/Batt.hs +++ b/Monitors/Batt.hs @@ -22,9 +22,6 @@ import Monitors.Common battConfig :: IO MConfig battConfig = mkMConfig "Batt: <left>" -- template - package -- package - "" -- usage tail? - [] -- added args ["left"] -- available replacements fileB1 :: (String, String) @@ -63,18 +60,8 @@ formatBatt x = l <- showWithColors f (x * 100) return [l] -package :: String -package = "xmb-batt" - runBatt :: [String] -> Monitor String runBatt _ = do c <- io $ parseBATT l <- formatBatt c parseTemplate l - -{- -main :: IO () -main = - do let af = runBatt [] - runMonitor battConfig af runBatt --} |