Simplify lasers

2025-01-07 01:36:23 +00:00
parent 4a9c1cd6b3
commit b3cf10bd26
15 changed files with 227 additions and 227 deletions
@@ -3,7 +3,7 @@ module Dodge.ListDisplayParams (
    invCursorParams,
    secondColumnParams,
    subInvX,
-    optionListDisplayParams,
+    menuDisplayParams,
 ) where

 import Control.Lens
@@ -51,8 +51,8 @@ subInvX = 10 * fromIntegral topInvW + 70
 topInvW :: Int
 topInvW = 15

-optionListDisplayParams :: ListDisplayParams
-optionListDisplayParams =
+menuDisplayParams :: ListDisplayParams
+menuDisplayParams =
    defaultListDisplayParams
        & ldpPos . spPixelOff .~ V2 11 (-70)
        & ldpScale .~ 2