Attempt to make CWorld correct instance of Store

src/Dodge/Data/CamouflageStatus.hs

@@ -5,6 +5,8 @@ module Dodge.Data.CamouflageStatus where
 
 import Data.Aeson
 import Data.Aeson.TH
+import TH.Derive
+import Data.Store
 
 data CamouflageStatus
     = FullyVisible
@@ -12,3 +14,4 @@ data CamouflageStatus
     deriving (Eq, Ord, Enum, Read, Show, Bounded)
 
 deriveJSON defaultOptions ''CamouflageStatus
+$($(derive [d| instance Deriving (Store CamouflageStatus) |]))