From f0ff12bc2d9e16a93f8fa9325fc1bd6d44d16e0b Mon Sep 17 00:00:00 2001
From: Felix Springer <felixspringer149@gmail.com>
Date: Wed, 10 Jul 2019 19:04:30 +0200
Subject: properly indented runCoreTemp

---
 src/Xmobar/Plugins/Monitors/CoreTemp.hs | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/src/Xmobar/Plugins/Monitors/CoreTemp.hs b/src/Xmobar/Plugins/Monitors/CoreTemp.hs
index 35378eb..e5c494e 100644
--- a/src/Xmobar/Plugins/Monitors/CoreTemp.hs
+++ b/src/Xmobar/Plugins/Monitors/CoreTemp.hs
@@ -37,15 +37,15 @@ coreTempNormalize = (/ 1000)
 -- | Retrieves Monitor String holding the core temperatures.
 runCoreTemp :: [String] -> Monitor String
 runCoreTemp _ = do
-   confDecDigits <- getConfigValue decDigits
-   confNaString <- getConfigValue naString
-   let coreLabel = Nothing
-       coreTempShow = showDigits (max 0 confDecDigits)
-   checkedDataRetrieval confNaString
-                        coreTempFilePaths
-                        coreLabel
-                        coreTempNormalize
-                        coreTempShow
+  confDecDigits <- getConfigValue decDigits
+  confNaString <- getConfigValue naString
+  let coreLabel = Nothing
+      coreTempShow = showDigits (max 0 confDecDigits)
+  checkedDataRetrieval confNaString
+                       coreTempFilePaths
+                       coreLabel
+                       coreTempNormalize
+                       coreTempShow
 
 startCoreTemp :: [String] -> Int -> (String -> IO ()) -> IO ()
 startCoreTemp a r cb = runM a coreTempConfig runCoreTemp r cb
-- 
cgit v1.2.3