Move towards a simplified creature update

src/Dodge/Creature/LtAutoCrit.hs

@@ -2,6 +2,7 @@ module Dodge.Creature.LtAutoCrit
     ( ltAutoCrit 
     ) where
 import Dodge.Data
+import Dodge.RemoveCreatureEndo
 import Dodge.Default
 import Dodge.Creature.Picture
 import Dodge.Creature.Impulse
@@ -29,7 +30,7 @@ import Control.Monad.Reader
 ltAutoCrit :: Creature
 ltAutoCrit = defaultCreature
     { _crPict = basicCrPict red
-    , _crUpdate = stateUpdate $ impulsiveAIR $
+    , _crUpdate = toCrUpdate $ stateUpdate $ impulsiveAIR $
         performActionsR
         >=> watchUpdateStratR
             [ (crHasTargetLOS, \_ _ -> StrategyActions (ShootAt 0)