summaryrefslogtreecommitdiffhomepage
path: root/Monitors/Batt.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Monitors/Batt.hs')
-rw-r--r--Monitors/Batt.hs13
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
--}