Cleanup

2021-12-11 19:44:48 +00:00
parent c847955b7c
commit 7116129a37
15 changed files with 21 additions and 41 deletions
@@ -29,7 +29,7 @@ import Control.Monad.State
 pistolCrit :: Creature
 pistolCrit = defaultCreature
    { _crPict = basicCrPict red
-    , _crUpdate =  stateUpdate' $ impulsiveAI $ chainCreatureUpdatesLR
+    , _crUpdate =  stateUpdate $ impulsiveAI $ chainCreatureUpdatesLR
        [Left performActions
        ,Left $ watchUpdateStrat
              [ (crHasTargetLOS, \w cr -> StrategyActions (ShootAt 0)