Work towards unifying all in game input

2023-02-21 00:37:26 +00:00
parent 7b9b1d1799
commit dee7472d31
5 changed files with 127 additions and 37 deletions
@@ -43,6 +43,11 @@ data SelectionSections a = SelectionSections
    , _sssSelPos :: Maybe (Int,Int)
    }

+--data SSSExtra :: SSSExtra
+--    { _sssSelPos :: Maybe (Int,Int)
+--    , _sssFilters :: IntMap (Maybe String
+--    }
+
 data SectionCursor = SectionCursor
    { _scurPos :: Int
    , _scurSize :: Int