style: fix linting

Amp-Thread-ID:
https://ampcode.com/threads/T-79499d9e-f4f4-40de-893c-524c32a45483
Co-authored-by: Amp <amp@ampcode.com>

1 files changed, 5 insertions, 5 deletions

diff --git a/Omni/Agent/Log.hs b/Omni/Agent/Log.hs
index 1f2746d..084052b 100644
--- a/Omni/Agent/Log.hs
+++ b/Omni/Agent/Log.hs
@@ -72,10 +72,10 @@ log msg = do
   ANSI.hCursorDown IO.stderr 1
   ANSI.hClearLine IO.stderr
   ANSI.hCursorUp IO.stderr 3
-  
+
   -- Print message (scrolls screen)
   TIO.hPutStrLn IO.stderr msg
-  
+
   -- Re-render status bars at bottom
   -- (Since we scrolled, we are now on the line above where the first status line should be)
   render
@@ -84,10 +84,10 @@ log msg = do
 render :: IO ()
 render = do
   Status {..} <- readIORef currentStatus
-  
+
   let taskStr = maybe "None" identity statusTask
       threadStr = maybe "None" identity statusThreadId
-  
+
   -- Line 1: Worker + Time
   ANSI.hSetCursorColumn IO.stderr 0
   ANSI.hClearLine IO.stderr
@@ -110,7 +110,7 @@ render = do
   ANSI.hSetCursorColumn IO.stderr 0
   ANSI.hClearLine IO.stderr
   TIO.hPutStr IO.stderr ("> " <> statusActivity)
-  
+
   -- Return cursor to Line 1
   ANSI.hCursorUp IO.stderr 3
   IO.hFlush IO.stderr