From aa66236081bff41ff7cea6cceac8d19095020763 Mon Sep 17 00:00:00 2001 From: Danny Navarro Date: Sun, 18 Dec 2016 11:43:45 -0300 Subject: Add homePlanet to test schema --- tests/Test/StarWars/Schema.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'tests/Test/StarWars/Schema.hs') diff --git a/tests/Test/StarWars/Schema.hs b/tests/Test/StarWars/Schema.hs index 9021bd0..ff79686 100644 --- a/tests/Test/StarWars/Schema.hs +++ b/tests/Test/StarWars/Schema.hs @@ -42,5 +42,6 @@ character char = , Schema.scalar "name" $ name char , Schema.array "friends" $ character <$> getFriends char , Schema.enum "appearsIn" . traverse getEpisode $ appearsIn char - , Schema.scalar "secretBackstory" $ secretBackstory char + , Schema.scalar "secretBackstory" $ secretBackstory char + , Schema.scalar "homePlanet" $ either mempty homePlanet char ] -- cgit v1.2.3