Cleanup

src/Dodge/Creature/PistolCrit.hs

@@ -4,15 +4,13 @@ module Dodge.Creature.PistolCrit
 import Dodge.Data
 import Dodge.Default
 import Dodge.Creature.Picture
+import Dodge.Creature.Update
 import Dodge.Creature.Test
-import Dodge.Creature.Impulse
 import Dodge.Creature.Action
 import Dodge.Creature.Volition
 import Dodge.Creature.Strategy
 import Dodge.Creature.ReaderUpdate
-import Dodge.Creature.ChainUpdates
 import Dodge.Creature.Perception
-import Dodge.Creature.State
 --import Dodge.Creature.State.Data
 import Dodge.Item.Weapon.BulletGuns
 import Dodge.Item.Consumable
@@ -29,7 +27,7 @@ import Control.Monad.State
 pistolCrit :: Creature
 pistolCrit = defaultCreature
     { _crPict = basicCrPict red
-    , _crUpdate =  stateUpdate' $ impulsiveAI' $ chainCreatureUpdates
+    , _crUpdate =  defaultImpulsive
         [ performActions
         , watchUpdateStrat
               [ (crHasTargetLOS, \w cr -> StrategyActions (ShootAt 0)