diff options
| author | Eugen Wissner <belka@caraus.de> | 2019-12-25 06:45:29 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2019-12-25 06:45:29 +0100 |
| commit | 62f3c34bfedeb286d3639ff3ade68cdb3fe862b8 (patch) | |
| tree | 5b690b78a52652f62d27cb5bbd4ce09350731023 /tests/Language/GraphQL/AST | |
| parent | bdf711d69f71596e29328ae766c126c04f919267 (diff) | |
| download | graphql-62f3c34bfedeb286d3639ff3ade68cdb3fe862b8.tar.gz | |
Replace AST.Selection data constructors
Diffstat (limited to 'tests/Language/GraphQL/AST')
| -rw-r--r-- | tests/Language/GraphQL/AST/EncoderSpec.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/Language/GraphQL/AST/EncoderSpec.hs b/tests/Language/GraphQL/AST/EncoderSpec.hs index 0067c83..619d7e3 100644 --- a/tests/Language/GraphQL/AST/EncoderSpec.hs +++ b/tests/Language/GraphQL/AST/EncoderSpec.hs @@ -35,7 +35,7 @@ spec = do it "indents block strings in arguments" $ let arguments = [Argument "message" (String "line1\nline2")] field = Field Nothing "field" arguments [] [] - set = OperationSelectionSet $ pure $ SelectionField field + set = OperationSelectionSet $ pure field operation = DefinitionOperation set in definition pretty operation `shouldBe` [r|{ field(message: """ |