From 882276a845c33c06b235d9604cbfd5b55d784c7d Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sat, 13 Jun 2020 07:20:19 +0200 Subject: Coerce result Fixes #45. --- src/Language/GraphQL/Execute.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Language/GraphQL/Execute.hs') diff --git a/src/Language/GraphQL/Execute.hs b/src/Language/GraphQL/Execute.hs index cfa935c..45bace0 100644 --- a/src/Language/GraphQL/Execute.hs +++ b/src/Language/GraphQL/Execute.hs @@ -14,7 +14,7 @@ import Language.GraphQL.Execute.Coerce import Language.GraphQL.Execute.Execution import qualified Language.GraphQL.Execute.Transform as Transform import Language.GraphQL.Error -import Language.GraphQL.Type.Definition +import qualified Language.GraphQL.Type.Definition as Definition import qualified Language.GraphQL.Type.Out as Out import Language.GraphQL.Type.Schema @@ -68,4 +68,4 @@ executeOperation :: Monad m -> Seq (Transform.Selection m) -> m Aeson.Value executeOperation types' objectType fields = - runCollectErrs types' $ executeSelectionSet Null objectType fields + runCollectErrs types' $ executeSelectionSet Definition.Null objectType fields -- cgit v1.2.3