diff options
author | jao <jao@gnu.org> | 2017-03-03 02:31:24 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2017-03-03 02:31:24 +0100 |
commit | 938a8d8307c1c4794c5fcf269c587c3c5c5e70df (patch) | |
tree | b7467c5d5e12d80e340fc9a7a287c08666a57075 | |
parent | dfb5dbd6cc5342348fbb46bd117c226d5e8127e4 (diff) | |
download | xmobar-938a8d8307c1c4794c5fcf269c587c3c5c5e70df.tar.gz xmobar-938a8d8307c1c4794c5fcf269c587c3c5c5e70df.tar.bz2 |
More paths for CoreTemp (issue #291)
-rw-r--r-- | src/Plugins/Monitors/CoreTemp.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/CoreTemp.hs b/src/Plugins/Monitors/CoreTemp.hs index e19baf0..ca2f07b 100644 --- a/src/Plugins/Monitors/CoreTemp.hs +++ b/src/Plugins/Monitors/CoreTemp.hs @@ -39,7 +39,8 @@ runCoreTemp _ = do failureMessage <- getConfigValue naString let path = ["/sys/bus/platform/devices/coretemp.", "/temp", "_input"] path' = ["/sys/bus/platform/devices/coretemp.", "/hwmon/hwmon", "/temp", "_input"] + path'' = ["/sys/class/hwmon/hwmon", "/device/hwmon/hwmon", "/temp", "_input"] lbl = Just ("_label", read . dropWhile (not . isDigit)) divisor = 1e3 :: Double show' = showDigits (max 0 dn) - checkedDataRetrieval failureMessage [path, path'] lbl (/divisor) show' + checkedDataRetrieval failureMessage [path, path', path''] lbl (/divisor) show' |