Separate selection list items from display parameters

2022-12-23 12:22:57 +00:00
parent 6ac4e5d669
commit b072dc9e9a
10 changed files with 141 additions and 132 deletions
@@ -57,6 +57,8 @@ data ScreenLayer
        , _scOptionFlag :: OptionScreenFlag
        , _scSelectionList :: SelectionList
        , _scAvailableLines :: Int
+        , _scShownItems :: [(SelectionItem,SelectionItemIndex)]
+        , _scListDisplayParams :: ListDisplayParams
        }
    | ColumnsScreen
        { _scTitle :: String