Merge pull request #140 from oswynb/fix-aeson-test

Fix ordering of CPP directive for aeson test
This commit is contained in:
Julian Arni 2015-06-23 16:51:52 +02:00
commit d27c7c0c6f

View file

@ -160,10 +160,10 @@ spec = describe "Servant.API.ContentTypes" $ do
(encode val)
`shouldBe` Just (Right val)
#if MIN_VERSION_aeson(0,9,0)
-- aeson >= 0.9 decodes top-level strings
describe "eitherDecodeLenient" $ do
-- aeson >= 0.9 decodes top-level strings
#if MIN_VERSION_aeson(0,9,0)
it "parses top-level strings" $ do
let toMaybe = either (const Nothing) Just
-- The Left messages differ, so convert to Maybe