This commit is contained in:
2025-08-27 19:22:01 +01:00
parent 40d2d316cb
commit dda0526180
9 changed files with 131 additions and 138 deletions
+3 -3
View File
@@ -37,14 +37,14 @@ drawOptions :: Config -> String -> Maybe Int -> [SelectionItem a] -> Picture
drawOptions cfig title msel sl =
darkenBackground cfig
<> drawTitle cfig title
<> drawSelectionList menuDisplayParams cfig sl
<> drawSelectionList menuLDP cfig sl
<> translateScreenPos
cfig
(menuDisplayParams ^. ldpPos)
(menuLDP ^. ldpPos)
( drawCursorAt
msel
sl
menuDisplayParams
menuLDP
50
(BoundaryCursor [North, South])
)