Isolate tests

Credentials from AuthSpec were interfering with StructureSpec
This commit is contained in:
Joe Nelson
2015-01-31 11:32:08 -08:00
parent 88af46fbe3
commit f06f3e3394
2 changed files with 19 additions and 13 deletions
+1 -1
View File
@@ -19,7 +19,7 @@ import TestTypes(IncPK(..), CompoundPK(..))
--import Debug.Trace
spec :: Spec
spec = around withApp $ do
spec = afterAll_ resetDb $ around withApp $ do
describe "Posting new record" $ do
after_ (clearTable "menagerie") . it "accepts disparate json types" $ do
p <- post "/menagerie"