Move towards incorporating sound into ai

src/Dodge/Creature/SentinelAI.hs

@@ -8,7 +8,7 @@ import Dodge.Creature.ReaderUpdate
 import Dodge.Creature.Strategy
 import Dodge.Creature.Action
 --import Dodge.Creature.ChooseTarget
-import Dodge.Creature.AlertLevel
+import Dodge.Creature.Perception
 --import Dodge.Creature.State
 --import Dodge.Creature.State.Data
 import Geometry.Data
@@ -56,7 +56,7 @@ sentinelFireType f = performActionsR
         )
       , (crAwayFromPost, goToPostStrat)
       ] 
-    >=> basicPerceptionUpdateR [0]
+    >=> perceptionUpdate [0]
     >=> doStrategyActionsR
     >=> reloadOverrideR
     >=> targetYouWhenCognizantR
@@ -77,7 +77,7 @@ sentinelExtraWatchUpdate
 sentinelExtraWatchUpdate xs = performActionsR
     >=>  watchUpdateStratR
         ( xs ++ [(crAwayFromPost, goToPostStrat)] )
-    >=> basicPerceptionUpdateR [0]
+    >=> perceptionUpdate [0]
     >=> doStrategyActionsR
     >=> targetYouWhenCognizantR
     >=> overrideInternalRRR