Cleanup, remove records, stop unecessary Aeson compile
This commit is contained in:
@@ -101,7 +101,7 @@ checkDeath cr w
|
||||
removecr
|
||||
| _crID cr == 0 =
|
||||
-- (cWorld . lWorld . creatures . ix (_crID cr) . crType .~ NonDrawnCreature)
|
||||
(cWorld . lWorld . creatures . ix (_crID cr) . crHP .~ 0)
|
||||
cWorld . lWorld . creatures . ix (_crID cr) . crHP .~ 0
|
||||
-- hack to get around player creature being killed but left with more than 0 hp
|
||||
| otherwise = cWorld . lWorld . creatures . at (_crID cr) .~ Nothing
|
||||
|
||||
|
||||
Reference in New Issue
Block a user