summaryrefslogtreecommitdiffhomepage
path: root/Plugins/Monitors/CoreTemp.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/CoreTemp.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/CoreTemp.hs')
-rw-r--r--Plugins/Monitors/CoreTemp.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/Plugins/Monitors/CoreTemp.hs b/Plugins/Monitors/CoreTemp.hs
index e59f0d3..f014335 100644
--- a/Plugins/Monitors/CoreTemp.hs
+++ b/Plugins/Monitors/CoreTemp.hs
@@ -17,11 +17,19 @@ module Plugins.Monitors.CoreTemp where
import Plugins.Monitors.Common
import Plugins.Monitors.CoreCommon
+-- |
+-- Core temperature default configuration. Default template contains only one
+-- core temperature, user should specify custom template in order to get more
+-- core frequencies.
coreTempConfig :: IO MConfig
coreTempConfig = mkMConfig
"Temp: <core0>C" -- template
(zipWith (++) (repeat "core") (map show [0 :: Int ..])) -- available
-- replacements
+
+-- |
+-- Function retrieves monitor string holding the core temperature
+-- (or temperatures)
runCoreTemp :: [String] -> Monitor String
runCoreTemp _ = do
let dir = "/sys/bus/platform/devices"