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