Improve item combination algorithm

2022-06-08 16:12:44 +01:00
parent 1b3988f961
commit ba8b33a87c
14 changed files with 77 additions and 22 deletions
@@ -28,7 +28,7 @@ copyItemToFloorID pos it w = (,) flid $ w'
        _ -> id
    flid = IM.newKey $ _floorItems w
    theflit = FlIt 
-        {_flIt = it & itConsumption . itAmount %~ const 1
+        {_flIt = it & itConsumption . icAmount %~ const 1
        ,_flItPos = p'
        ,_flItRot = rot
        ,_flItID = flid