Work on orienting and drawing attachments

2024-09-30 23:02:22 +01:00
parent 48b8cfe7ef
commit 752b568a86
13 changed files with 340 additions and 229 deletions
@@ -115,7 +115,7 @@ itemNumberDisplay cr itm = case iu of
    CraftUse -> []
    ConsumeUse {} -> []
    AttachUse {} -> []
-    AmmoMagUse {} -> [maybe "" shortShow $ itm ^? itUse . amagLoadStatus . iaLoaded]
+    UseAmmoMag {} -> [maybe "" shortShow $ itm ^? itUse . amagLoadStatus . iaLoaded]
    ScopeUse OpticScope {_opticZoom = x} -> [shortShow x]
    ScopeUse {} -> []
    TargetingUse {_tgPos = mp} -> [maybe "" shortShow mp]