Mostly use String instead of Text

2023-01-15 12:26:45 +00:00
parent 64b1c2761e
commit a50e2ff406
18 changed files with 50 additions and 65 deletions
@@ -46,6 +46,11 @@ data SelectionItem a = SelectionItem
    }
    | SelectionFilter
    { _siPictures :: [String]
+    , _siHeight :: Int
+    , _siIsSelectable :: Bool
+    , _siWidth  :: Int
+    , _siColor  :: Color
+    , _siOffX   :: Int
    }
    --deriving (Eq, Ord, Show, Read) --Generic, Flat)