summaryrefslogtreecommitdiff
path: root/Data/GraphQL/Encoder.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/Encoder.hs
parent770df827181f71b87aa286910cc7873a34edcede (diff)
downloadgraphql-d8a731fe30ce800ac8347a902f38373d6cf689b2.tar.gz
Remove `StringValue` type
Diffstat (limited to 'Data/GraphQL/Encoder.hs')
-rw-r--r--Data/GraphQL/Encoder.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Data/GraphQL/Encoder.hs b/Data/GraphQL/Encoder.hs
index 9eed849..2b7e239 100644
--- a/Data/GraphQL/Encoder.hs
+++ b/Data/GraphQL/Encoder.hs
@@ -106,8 +106,8 @@ booleanValue True = "true"
booleanValue False = "false"
-- TODO: Escape characters
-stringValue :: StringValue -> Text
-stringValue (StringValue v) = quotes v
+stringValue :: Text -> Text
+stringValue = quotes
listValue :: ListValue -> Text
listValue (ListValue vs) = bracketsCommas value vs