Commit before extending selection sections: overlapping elements

2023-05-19 13:38:21 +01:00
parent 2f0bb5115b
commit ac87621640
13 changed files with 131 additions and 115 deletions
@@ -78,6 +78,7 @@ data SelectionItem a
        , _siIsSelectable :: Bool
        , _siColor :: Color
        , _siOffX :: Int
+        , _siOffY :: Int
        , _siPayload :: a
        }
    | SelectionInfo
@@ -86,6 +87,7 @@ data SelectionItem a
        , _siIsSelectable :: Bool
        , _siColor :: Color
        , _siOffX :: Int
+        , _siOffY :: Int
        }

 makeLenses ''ListDisplayParams