From d8a731fe30ce800ac8347a902f38373d6cf689b2 Mon Sep 17 00:00:00 2001
From: Danny Navarro <j@dannynavarro.net>
Date: Mon, 22 Feb 2016 13:59:38 +0100
Subject: Remove `StringValue` type

---
 Data/GraphQL/AST.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'Data/GraphQL/AST.hs')

diff --git a/Data/GraphQL/AST.hs b/Data/GraphQL/AST.hs
index 1303908..2703a5b 100644
--- a/Data/GraphQL/AST.hs
+++ b/Data/GraphQL/AST.hs
@@ -68,14 +68,12 @@ data Value = ValueVariable Variable
            -- GraphQL Float is double precison
            | ValueFloat Double
            | ValueBoolean Bool
-           | ValueString StringValue
+           | ValueString Text
            | ValueEnum Name
            | ValueList ListValue
            | ValueObject ObjectValue
              deriving (Eq,Show)
 
-newtype StringValue = StringValue Text deriving (Eq,Show)
-
 newtype ListValue = ListValue [Value] deriving (Eq,Show)
 
 newtype ObjectValue = ObjectValue [ObjectField] deriving (Eq,Show)
-- 
cgit v1.2.3