From e87272bf601bd2efa2c6ef08d6a42765b809e6d9 Mon Sep 17 00:00:00 2001
From: "Jose A. Ortega Ruiz" <jao@gnu.org>
Date: Tue, 19 Jan 2010 20:47:26 +0100
Subject: CoreTemp: round temperatures instead of truncating them

Ignore-this: dd5d719c37169216ad664f916d2bb590

darcs-hash:20100119194726-40885-85c5113621d44d94fc73f6f99f283232d676e1a5.gz
---
 Plugins/Monitors/CoreTemp.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Plugins/Monitors/CoreTemp.hs b/Plugins/Monitors/CoreTemp.hs
index 2bb220c..1db6a28 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 = (floor . (/1000.0)) :: Double -> Integer
+        divisor = (round . (/1000.0)) :: Double -> Integer
         failureMessage = "CoreTemp: N/A"
     checkedDataRetrieval failureMessage dir file pattern divisor
 
-- 
cgit v1.2.3