diff options
-rw-r--r-- | news.md | 14 | ||||
-rw-r--r-- | src/Plugins/Monitors/CoreTemp.hs | 15 |
2 files changed, 22 insertions, 7 deletions
@@ -6,6 +6,20 @@ _New features_ - New monitor `BatteryN`, a variant of `BatteryP` that lets you specify the name of the monitor in the template. + - Support for configuration file living in XDG_CONFIG_HOME (see + [github #99]). + +_Bug fixes_ + + - Honour the "-d" option in `CoreTemp` ([github #115]) + - Fix for systems not supporting PCRE regular expressions: we use + now BCEs, so regex-compat should be enough everywhere (see + [github #117]). + + +[github #99]: https://github.com/jaor/xmobar/issues/115 +[github #115]: https://github.com/jaor/xmobar/issues/115 +[github #117]: https://github.com/jaor/xmobar/issues/117 ## Version 0.18 (June 5, 2013) diff --git a/src/Plugins/Monitors/CoreTemp.hs b/src/Plugins/Monitors/CoreTemp.hs index 2880751..c6f98da 100644 --- a/src/Plugins/Monitors/CoreTemp.hs +++ b/src/Plugins/Monitors/CoreTemp.hs @@ -34,10 +34,11 @@ coreTempConfig = mkMConfig -- Function retrieves monitor string holding the core temperature -- (or temperatures) runCoreTemp :: [String] -> Monitor String -runCoreTemp _ = let path = ["/sys/bus/platform/devices/coretemp.", - "/temp", - "_input"] - lbl = Just ("_label", read . (dropWhile (not . isDigit))) - divisor = 1e3 :: Double - failureMessage = "CoreTemp: N/A" - in checkedDataRetrieval failureMessage path lbl (/divisor) show +runCoreTemp _ = do + dn <- getConfigValue decDigits + 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' |