Cleanup targeting

2023-01-05 11:01:12 +00:00
parent c48a553967
commit 0302685053
24 changed files with 66 additions and 95 deletions
@@ -139,7 +139,7 @@ pjTrack :: Int -> Proj -> World -> World
 pjTrack itid pj w = rotateToTarget pj w
  where
    rotateToTarget _ = fromMaybe id $ do
-        tpos <- w ^? itPoint . itTargeting . tgPos . _Just
+        tpos <- w ^? itPoint . itUse . heldTargeting . tgPos . _Just
        return $
            cWorld . lWorld . projectiles . ix (_prjID pj) . prjSpin
                .~ turnToAmount