diff options
| author | Danny Navarro <j@dannynavarro.net> | 2016-02-22 13:59:38 +0100 |
|---|---|---|
| committer | Danny Navarro <j@dannynavarro.net> | 2016-02-22 13:59:38 +0100 |
| commit | d8a731fe30ce800ac8347a902f38373d6cf689b2 (patch) | |
| tree | e66eab79a62fb28a33b7ec6f5ecc6cba9be62927 /Data/GraphQL/Parser.hs | |
| parent | 770df827181f71b87aa286910cc7873a34edcede (diff) | |
| download | graphql-d8a731fe30ce800ac8347a902f38373d6cf689b2.tar.gz | |
Remove `StringValue` type
Diffstat (limited to 'Data/GraphQL/Parser.hs')
| -rw-r--r-- | Data/GraphQL/Parser.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Data/GraphQL/Parser.hs b/Data/GraphQL/Parser.hs index 1f5b8e6..6658af0 100644 --- a/Data/GraphQL/Parser.hs +++ b/Data/GraphQL/Parser.hs @@ -169,8 +169,8 @@ booleanValue = True <$ tok "true" <|> False <$ tok "false" -- TODO: Escape characters. Look at `jsstring_` in aeson package. -stringValue :: Parser StringValue -stringValue = StringValue <$> quotes (takeWhile (/= '"')) +stringValue :: Parser Text +stringValue = quotes (takeWhile (/= '"')) -- Notice it can be empty listValue :: Parser ListValue |