1 files changed, 7 insertions, 7 deletions
diff --git a/src/Plugins/Monitors/CpuFreq.hs b/src/Plugins/Monitors/CpuFreq.hs
index dcf75e5..6209ef3 100644
--- a/src/Plugins/Monitors/CpuFreq.hs
+++ b/src/Plugins/Monitors/CpuFreq.hs
@@ -30,10 +30,10 @@ cpuFreqConfig = mkMConfig
 -- |
 -- Function retrieves monitor string holding the cpu frequency (or frequencies)
 runCpuFreq :: [String] -> Monitor String
-runCpuFreq _ = let path = ["/sys/devices/system/cpu/cpu", "/cpufreq/scaling_cur_freq"]
-                   divisor = 1e6 :: Double
-                   failureMessage = "CpuFreq: N/A"
-                   fmt x | x < 1     = (show (round (x * 1000) :: Integer)) ++ "MHz"
-                         | otherwise = (show x) ++ "GHz"
-               in  checkedDataRetrieval failureMessage path Nothing (/divisor) fmt
-
+runCpuFreq _ =
+  let path = ["/sys/devices/system/cpu/cpu", "/cpufreq/scaling_cur_freq"]
+      divisor = 1e6 :: Double
+      failureMessage = "CpuFreq: N/A"
+      fmt x | x < 1 = (show (round (x * 1000) :: Integer)) ++ "MHz"
+            | otherwise = (show x) ++ "GHz"
+  in  checkedDataRetrieval failureMessage path Nothing (/divisor) fmt