Cleanup

2024-09-27 23:10:01 +01:00
parent 6c3d0d5def
commit d1690ed3ac
10 changed files with 124 additions and 194 deletions
@@ -506,7 +506,7 @@ createProjectile magtree muz itm cr = fromMaybe failsound $ do
    let mscreen = lookup RemoteScreenLink (magtree ^. ldtLeft)
    j <- ammoitem ^? itLocation . ilInvID
    aparams <- ammoitem ^? itUse . amagParams
-    return $ fireTrackingShell (mscreen ^? _Just . ldtValue) aparams muz itm cr 
+    return $ createShell (mscreen ^? _Just . ldtValue) aparams muz itm cr 
        . startthesound
        . useammo j
  where