Remove more LDTs

src/Dodge/Data/ComposedItem.hs

@@ -12,7 +12,7 @@ import Linear
 import qualified Linear.Quaternion as Q
 
 data ItemLink
-    = TriggerLink
+     --TriggerLink
 --    | AmmoInLink Int AmmoType
 --    | AmmoModLink
 --    | AmmoTargetingLink
@@ -31,7 +31,7 @@ data ItemLink
 --    | UnderBarrelSlotLink
 --    | UnderBarrelPlatformLink
 --    | GrenadeHitEffectLink
-    | SFLink {_sfLink :: ItemStructuralFunction}
+    = SFLink {_sfLink :: ItemStructuralFunction}
     deriving (Eq, Ord, Show, Read)
 
 data ItemStructuralFunction