@@ -36,7 +36,7 @@ data TestJSON = TestJSON
36 , hash :: HashMap Text Text
36 , hash :: HashMap Text Text
37 } deriving (Show, Eq)
37 } deriving (Show, Eq)
39−deriveJSON id ''TestJSON
39+deriveJSON defaultOptions ''TestJSON
41main :: IO ()
41main :: IO ()
42main = hspec $ do
42main = hspec $ do