about summary refs log tree commit diff
path: root/src/Xanthous/AI/Gormlak.hs
diff options
context:
space:
mode:
authorGriffin Smith <root@gws.fyi>2019-10-05T20·25-0400
committerGriffin Smith <root@gws.fyi>2019-10-05T20·25-0400
commit262fc7fb41f14181ed34cecfcca9ef2d25102688 (patch)
tree0b3405354c5c6c165d0cc170bff76a74279afa0d /src/Xanthous/AI/Gormlak.hs
parent5c6ba40019ea23660cfab80864593b398567f223 (diff)
Don't move creatures when they're attacking
This may have resulted in a double-attack per turn
Diffstat (limited to 'src/Xanthous/AI/Gormlak.hs')
-rw-r--r--src/Xanthous/AI/Gormlak.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xanthous/AI/Gormlak.hs b/src/Xanthous/AI/Gormlak.hs
index c9af68842635..68feb67ac227 100644
--- a/src/Xanthous/AI/Gormlak.hs
+++ b/src/Xanthous/AI/Gormlak.hs
@@ -36,7 +36,7 @@ stepGormlak pe@(Positioned pos creature) = do
       then do
         charPos <- use characterPosition
         if isUnit (pos `diffPositions` charPos)
-          then attackCharacter $> charPos
+          then attackCharacter $> pos
           else pure $ pos `stepTowards` charPos
     else do
       lines <- uses entities $ linesOfSight pos (Creature.visionRadius creature)