Continue reload refactor

2022-06-21 14:07:17 +01:00
parent 14a7189b44
commit 53c8be0679
33 changed files with 106 additions and 115 deletions
@@ -17,7 +17,7 @@ getHeldItemLoc cr w = case maybeitid of
    _ -> (w, itid)
  where
    cid = _crID cr
-    j = _crInvSel cr
+    j = crSel cr
    newitid = IM.newKey $ _itemPositions w
    maybeitid = cr ^? crInv . ix j . itID . _Just
    itid = fromMaybe newitid maybeitid