create items in test, not in the schema.

test/Feature/QuerySpec.hs

@@ -6,7 +6,10 @@ import Test.Hspec.Wai
 import SpecHelper
 
 spec :: Spec
-spec = beforeAll resetDb $ around withApp $ do
+spec = beforeAll (do
+     resetDb
+     createItems 15
+  ) . afterAll_ (clearTable "items") . around withApp $ do
   describe "Querying a nonexistent table" $
     it "causes a 404" $
       get "/faketable" `shouldRespondWith` 404