summaryrefslogtreecommitdiffhomepage
path: root/Plugins/Monitors/Thermal.hs
diff options
context:
space:
mode:
authorJuraj Hercek <juhe_haskell@hck.sk>2007-12-23 00:14:19 +0100
committerJuraj Hercek <juhe_haskell@hck.sk>2007-12-23 00:14:19 +0100
commit81a2809683ceda6475d6d42df644dce102dd290b (patch)
tree1253d1e659cde402e22f5608426de9d6f7fe80fd /Plugins/Monitors/Thermal.hs
parent112d0191be18b474c750664f683e17c9e919d020 (diff)
downloadxmobar-81a2809683ceda6475d6d42df644dce102dd290b.tar.gz
xmobar-81a2809683ceda6475d6d42df644dce102dd290b.tar.bz2
Added documentation.
- added Thermal, CoreTemp, CpuFreq documentation to README file - added haddock documentation darcs-hash:20071222231419-f49a6-beadaa214bd80a9eb12f568dbff8dcf0d88ecfe7.gz
Diffstat (limited to 'Plugins/Monitors/Thermal.hs')
-rw-r--r--Plugins/Monitors/Thermal.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Plugins/Monitors/Thermal.hs b/Plugins/Monitors/Thermal.hs
index 4814aa5..a3ffe6d 100644
--- a/Plugins/Monitors/Thermal.hs
+++ b/Plugins/Monitors/Thermal.hs
@@ -18,11 +18,15 @@ import qualified Data.ByteString.Lazy.Char8 as B
import Plugins.Monitors.Common
import System.Posix.Files (fileExist)
+-- | Default thermal configuration.
thermalConfig :: IO MConfig
thermalConfig = mkMConfig
"Thm: <temp>C" -- template
["temp"] -- available replacements
+-- | Retrieves thermal information. Argument is name of thermal directory in
+-- \/proc\/acpi\/thermal_zone. Returns the monitor string parsed according to
+-- template (either default or user specified).
runThermal :: [String] -> Monitor String
runThermal args = do
let zone = head args