summaryrefslogtreecommitdiff
path: root/Data/GraphQL/Execute.hs
diff options
context:
space:
mode:
authorDanny Navarro <j@dannynavarro.net>2016-02-22 13:59:38 +0100
committerDanny Navarro <j@dannynavarro.net>2016-02-22 13:59:38 +0100
commitd8a731fe30ce800ac8347a902f38373d6cf689b2 (patch)
treee66eab79a62fb28a33b7ec6f5ecc6cba9be62927 /Data/GraphQL/Execute.hs
parent770df827181f71b87aa286910cc7873a34edcede (diff)
downloadgraphql-d8a731fe30ce800ac8347a902f38373d6cf689b2.tar.gz
Remove `StringValue` type
Diffstat (limited to 'Data/GraphQL/Execute.hs')
-rw-r--r--Data/GraphQL/Execute.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Data/GraphQL/Execute.hs b/Data/GraphQL/Execute.hs
index 8d0335d..47d1d03 100644
--- a/Data/GraphQL/Execute.hs
+++ b/Data/GraphQL/Execute.hs
@@ -37,5 +37,5 @@ substitute _ sel = sel
-- TODO: Support different value types
subsArg :: Schema.Subs -> Argument -> Maybe Argument
subsArg subs (Argument n (ValueVariable (Variable v))) =
- Argument n . ValueString . StringValue <$> subs v
+ Argument n . ValueString <$> subs v
subsArg _ arg = Just arg