diff options
Diffstat (limited to 'Plugins/Monitors/CoreTemp.hs')
| -rw-r--r-- | Plugins/Monitors/CoreTemp.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Plugins/Monitors/CoreTemp.hs b/Plugins/Monitors/CoreTemp.hs index f014335..2bb220c 100644 --- a/Plugins/Monitors/CoreTemp.hs +++ b/Plugins/Monitors/CoreTemp.hs @@ -35,7 +35,7 @@ runCoreTemp _ = do let dir = "/sys/bus/platform/devices" file = "temp1_input" pattern = "coretemp." - divisor = 1e3 :: Double + divisor = (floor . (/1000.0)) :: Double -> Integer failureMessage = "CoreTemp: N/A" checkedDataRetrieval failureMessage dir file pattern divisor |