Remove _crCamouflage/wrist invisibility on equip/unequip

Invisibility no longer works

src/Dodge/Data/Item/Use/Equipment.hs

@@ -7,7 +7,6 @@ module Dodge.Data.Item.Use.Equipment (
     module Dodge.Data.Item.Use.Equipment,
 ) where
 
-import Dodge.Data.CamouflageStatus
 import Geometry.Data
 import Control.Lens
 import Data.Aeson
@@ -28,7 +27,7 @@ data EquipEffect = EquipEffect
 
 data ItmCrWdWd
     = ItmCrWdWdDoNothing
-    | ECamouflage {_euseCamouflageStatus :: CamouflageStatus}
+--    | ECamouflage {_euseCamouflageStatus :: CamouflageStatus}
     | EonWristShield
     | EoffWristShield
     deriving (Eq, Ord, Show, Read) --Generic, Flat)