Tweak display when equiping

2023-05-12 00:48:07 +01:00
parent 6081f90f90
commit 2d32eeb266
5 changed files with 57 additions and 45 deletions
@@ -43,7 +43,7 @@ invDisplayParams w =
 secondColumnParams :: ListDisplayParams
 secondColumnParams =
    defaultListDisplayParams
-        & ldpPos . spPixelOff .~ V2 subInvX (-61)
+        & ldpPos . spPixelOff .~ V2 subInvX (-71)
        & ldpCursorSides .~ [North, South, West]

 subInvX :: Float
@@ -73,4 +73,3 @@ optionListDisplayParams =
        & ldpVerticalGap .~ 0
        & ldpWidth .~ FixedSelectionWidth 50
        & ldpCursorSides .~ [North, South, West]
-