From d2ea9fb467fdd1cba053cd3930777993c569ef0b Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Mon, 8 Jan 2024 22:29:58 +0100 Subject: Release 1.2.0.2 --- src/Language/GraphQL/Execute.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Language/GraphQL/Execute.hs b/src/Language/GraphQL/Execute.hs index 10772e7..265e94f 100644 --- a/src/Language/GraphQL/Execute.hs +++ b/src/Language/GraphQL/Execute.hs @@ -561,7 +561,7 @@ coerceArgumentValues argumentDefinitions argumentValues = $ Full.node <$> argumentValues coerceArgumentValue inputType transform = - coerceInputLiteral inputType $ extractArgumentValue transform + coerceInputLiteral inputType $ extractArgumentValue transform extractArgumentValue (Transform.Int integer) = Type.Int integer extractArgumentValue (Transform.Boolean boolean) = Type.Boolean boolean @@ -569,7 +569,7 @@ coerceArgumentValues argumentDefinitions argumentValues = extractArgumentValue (Transform.Float float) = Type.Float float extractArgumentValue (Transform.Enum enum) = Type.Enum enum extractArgumentValue Transform.Null = Type.Null - extractArgumentValue (Transform.List list) = + extractArgumentValue (Transform.List list) = Type.List $ extractArgumentValue <$> list extractArgumentValue (Transform.Object object) = Type.Object $ extractArgumentValue <$> object -- cgit v1.2.3