apply hlint suggestion

swarm-game · Jan 9, 2025 · c551791 · c551791
1 parent d38b0ba
commit c551791
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/swarm-tui/Swarm/TUI/View/Popup.hs b/src/swarm-tui/Swarm/TUI/View/Popup.hs
@@ -59,7 +59,7 @@ drawPopup s = \case
   DebugWarningPopup ->
     hBox
       [ withAttr notifAttr (txt "Warning: ")
-      , txt $ "No progress will be saved, since debugging flags are in use."
+      , txt "No progress will be saved, since debugging flags are in use."
       ]
 
 -- | Compute the number of rows of the notification popup we should be