Better check for wall collisions when expanding creature

2021-11-19 23:22:49 +00:00
parent 51d89982ed
commit 9f4ff3a75a
4 changed files with 34 additions and 23 deletions
@@ -47,7 +47,7 @@ useShrinkGun it cr w = if _itBool $ _itAttachment it
    then tryResize 0.5 $ stripNoItems cr . f False UndroppableIdentified . dropUnselected cr
    else tryResize 1   $ f True Uncursed . setMinInvSize defaultInvSize cr
  where
-    tryResize x g = maybe w g $ maybeSizeSelf x cr w
+    tryResize x g = maybe w g $ sizeSelf x cr w
    f isInUse cstatus = creatures . ix (_crID cr) . crInv . ix (_crInvSel cr) %~
        ( (itAttachment . itBool .~ isInUse) . (itCurseStatus .~ cstatus) )