Cleanup, tweak selection sections positioning

2023-02-23 16:13:40 +00:00
parent c5bfa36bde
commit 86943f4170
8 changed files with 79 additions and 120 deletions
@@ -82,14 +82,6 @@ data SelectionItem a = SelectionItem
    , _siColor  :: Color
    , _siOffX   :: Int
    }
-    | SelectionRegex
-    { _siPictures :: [String]
-    , _siHeight :: Int
-    , _siIsSelectable :: Bool
-    , _siColor  :: Color
-    , _siOffX   :: Int
-    }
-    --deriving (Eq, Ord, Show, Read) --Generic, Flat)

 makeLenses ''ListDisplayParams
 makeLenses ''SelectionList