Move around ammo source checks

src/Dodge/Item/Weapon/Bullet.hs

@@ -1,5 +1,4 @@
 module Dodge.Item.Weapon.Bullet (
-    basicBulletAmmo,
     hvBulletAmmo,
     defaultBullet,
 ) where
@@ -8,11 +7,6 @@ import Control.Lens
 import Dodge.Data.Item.Use.Consumption.Ammo
 import Geometry.Data
 
-basicBulletAmmo :: AmmoType
-basicBulletAmmo = SmallBulletAmmo
-
---        , _amBullet = defaultBullet
-
 defaultBullet :: Bullet
 defaultBullet =
     Bullet

src/Dodge/Item/Weapon/Drone.hs

@@ -16,7 +16,7 @@ droneLauncher =
         & itUse . heldAim . aimWeight .~ 8
         & itUse . heldAim . aimRange .~ 0.5
         & itUse . heldAim . aimStance .~ TwoHandOver
-        & itUse . heldConsumption . laAmmoType .~ DroneAmmo
+        & itUse . heldConsumption .~ [DroneAmmo]
         & itType . iyBase .~ HELD DRONELAUNCHER
 
 lasDronesPic :: Item -> SPic