From a6c0d63049044b825d1fd0efe6023de82cb11766 Mon Sep 17 00:00:00 2001
From: "Pweaver (Paul Weaver)" <paul@mordor.org>
Date: Fri, 8 Jul 2016 17:50:31 -0400
Subject: add tests for errors in queries for queries in starwars tests

---
 tests/Test/StarWars/Data.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'tests/Test/StarWars/Data.hs')

diff --git a/tests/Test/StarWars/Data.hs b/tests/Test/StarWars/Data.hs
index a898cea..cec90ae 100644
--- a/tests/Test/StarWars/Data.hs
+++ b/tests/Test/StarWars/Data.hs
@@ -56,6 +56,9 @@ appearsIn :: Character -> [Int]
 appearsIn (Left  x) = _appearsIn . _droidChar $ x
 appearsIn (Right x) = _appearsIn . _humanChar $ x
 
+secretBackstory :: Character -> Text
+secretBackstory = error "secretBackstory is secret."
+
 luke :: Character
 luke = Right luke'
 
-- 
cgit v1.2.3