Remove _ssCursor

2024-10-31 09:55:12 +00:00
parent 79b0af228e
commit a2dd10323c
5 changed files with 93 additions and 88 deletions
@@ -206,7 +206,7 @@ updateSection ::
 updateSection sis mcsel availablelines ss =
    ss
        & ssItems .~ sis
-        & ssCursor .~ scurs
+--        & ssCursor .~ scurs
        & ssOffset .~ offset
        & ssShownItems .~ shownitems
  where
@@ -290,7 +290,7 @@ enterCombineInv cfig w =
    filtsection =
        SelectionSection
            { _ssItems = mempty
-            , _ssCursor = Nothing
+--            , _ssCursor = Nothing
            , _ssMinSize = 0
            , _ssOffset = 0
            , _ssShownItems = mempty
@@ -304,9 +304,9 @@ enterCombineInv cfig w =
            availablelines
            SelectionSection
                { _ssItems = cm
-                , _ssCursor = do
-                    (_, si) <- IM.lookupMin cm
-                    return $ SectionCursor 0 (_siHeight si) (_siColor si)
+--                , _ssCursor = do
+--                    (_, si) <- IM.lookupMin cm
+--                    return $ SectionCursor 0 (_siHeight si) (_siColor si)
                , _ssMinSize = 5
                , _ssOffset = 0
                , _ssShownItems = mempty