TerminalUI tidying

codedownio · Aug 3, 2023 · 47cec25 · 47cec25
1 parent 7bcc487
commit 47cec25
Show file tree

Hide file tree

Showing 3 changed files with 1 addition and 3 deletions.
diff --git a/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI.hs b/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI.hs
@@ -313,7 +313,7 @@ appEvent s (VtyEvent e) =
       & appShowFileLocations %~ not
     V.EvKey c [] | c == toggleVisibilityThresholdsKey -> continue $ s
       & appShowVisibilityThresholds %~ not
-    V.EvKey c [] | c `elem` [V.KEsc, exitKey]-> do
+    V.EvKey c [] | c `elem` [V.KEsc, exitKey] -> do
       -- Cancel everything and wait for cleanups
       liftIO $ mapM_ cancelNode (s ^. appRunTreeBase)
       forM_ (s ^. appRunTreeBase) (liftIO . waitForTree)

diff --git a/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI/Draw/Util.hs b/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI/Draw/Util.hs
@@ -1,5 +1,4 @@
 {-# LANGUAGE CPP #-}
--- |
 
 module Test.Sandwich.Formatters.TerminalUI.Draw.Util where
 

diff --git a/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI/Keys.hs b/sandwich/unix-src/Test/Sandwich/Formatters/TerminalUI/Keys.hs
@@ -1,4 +1,3 @@
--- |
 
 module Test.Sandwich.Formatters.TerminalUI.Keys where