Simplify creature action/impulse code

src/Dodge/Creature/Update.hs

@@ -1,6 +1,5 @@
 module Dodge.Creature.Update (updateCreature) where
 
-import Dodge.Creature.Impulse
 import Linear
 import NewInt
 import Color
@@ -48,7 +47,7 @@ updateCreature' cr =
         LampCrit{} -> updateLampoid cr
         BarrelCrit bt -> updateBarreloid bt cr
         AvatarDead -> id
-        ChaseCrit {} -> \w -> crUpdate cid . followImpulses cid 
+        ChaseCrit {} -> \w -> crUpdate cid . performActions cid 
             $ over (cWorld . lWorld . creatures . ix cid) (chaseCritInternal w) w
         _ -> crUpdate cid 
   where