summaryrefslogtreecommitdiffhomepage
path: root/src/Plugins/Monitors/CoreTemp.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Plugins/Monitors/CoreTemp.hs')
-rw-r--r--src/Plugins/Monitors/CoreTemp.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/CoreTemp.hs b/src/Plugins/Monitors/CoreTemp.hs
index c6f98da..5109070 100644
--- a/src/Plugins/Monitors/CoreTemp.hs
+++ b/src/Plugins/Monitors/CoreTemp.hs
@@ -36,9 +36,9 @@ coreTempConfig = mkMConfig
runCoreTemp :: [String] -> Monitor String
runCoreTemp _ = do
dn <- getConfigValue decDigits
+ failureMessage <- getConfigValue naString
let path = ["/sys/bus/platform/devices/coretemp.", "/temp", "_input"]
lbl = Just ("_label", read . (dropWhile (not . isDigit)))
divisor = 1e3 :: Double
- failureMessage = "CoreTemp: N/A"
show' = showDigits (max 0 dn)
checkedDataRetrieval failureMessage path lbl (/divisor) show'