add scrollbar to scenario menu (#1770)

Closes #1687 ![Screenshot from 2024-02-18 17-53-28](https://github.com/swarm-game/swarm/assets/261693/86fc4ea5-23f8-4cc5-b676-ae17d81b1b34)
swarm-game · Feb 19, 2024 · 7c991f7 · 7c991f7
1 parent 95a9014
commit 7c991f7
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/Swarm/TUI/View.hs b/src/Swarm/TUI/View.hs
@@ -210,6 +210,9 @@ drawNewGameMenuUI (l :| ls) launchOptions = case displayedFor of
                 , txt " "
                 , vLimit 20
                     . hLimit 35
+                    . withLeftPaddedVScrollBars
+                    . padLeft (Pad 1)
+                    . padTop (Pad 1)
                     . BL.renderList (const $ padRight Max . drawScenarioItem) True
                     $ l
                 ]