Cleanup

2026-05-08 10:10:06 +01:00
parent 7c1ada4546
commit 84e95da2b5
4 changed files with 38 additions and 53 deletions
@@ -198,7 +198,7 @@ updateCalmBee cr cid w
        & cWorld . lWorld . creatures . ix tid . crType . slimeSlime -~ sspeed
    | Just (tcr,ti) <- gettarg
    , distance (cr ^. crPos . _xy) (tcr ^. crPos . _xy) < 0.8*crRad (tcr ^. crType) 
-    , Just r <- tcr ^? crType . slimeSlime . to slimeToRad
+--    , Just r <- tcr ^? crType . slimeSlime . to slimeToRad
    , Just d <- tcr ^? crType . slimeCompression
        = w
 --        & tocr . crStance . carriage .~ Mounted ti (cr ^. crPos - tcr ^. crPos & _xy %~ compressionScale (vNormal ((1/r) *^d)))