Remove _crTwist

2025-05-30 10:23:37 +01:00
parent 3efa01bf09
commit 0bcf263db7
14 changed files with 304 additions and 259 deletions
@@ -30,7 +30,7 @@ heldItemOrient2D itm cr p a = (V2 x y, argV . Q.qToV2 $ q )

 heldItemRelativeOrient :: Item -> Creature -> (Point3, Q.Quaternion Float) -> (Point3, Q.Quaternion Float)
 heldItemRelativeOrient itm cr (p,q)
-    |  _posture (_crStance cr) == Aiming =
+    | Aiming {} <- _posture (_crStance cr) =
        (p + aimingWeaponZeroPos cr itm `v2z` shoulderHeight, Q.qID * q)
    |  isTwoHandFlat = 
        ( V3 (_crRad cr) 0 handD