Cleanup

2025-08-26 19:35:19 +01:00
parent 1ebdbdd8ae
commit e5473d1028
4 changed files with 53 additions and 77 deletions
@@ -43,7 +43,8 @@ tryPutItemInInv cid itid w = do
                & updateselectionextra invid
  where
    updateselectionextra i
-        | cid == 0 = hud . diSelection . _Just . slSet %~ IS.map (f i)
+        | cid == 0 = (hud . diSelection . _Just . slSet %~ IS.map (f i))
+            . (hud . diSelection . _Just . slInt %~ (f i))
        | otherwise = id
    f j i | i >= _unNInt j = i + 1
          | otherwise = i