Fix lint issue

This commit is contained in:
Ruslan Talpa
2015-11-20 16:11:21 +02:00
parent 0cce22f8c1
commit cf2e45d47f
+1 -1
View File
@@ -207,7 +207,7 @@ spec = afterAll_ resetDb $ around withApp $ do
}
after_ (clearTable "no_pk") . context "with wrong number of columns" $ do
after_ (clearTable "no_pk") . context "with wrong number of columns" $
it "fails for too few" $ do
p <- request methodPost "/no_pk" [("Content-Type", "text/csv")] "a,b\nfoo,bar\nbaz"
liftIO $ simpleStatus p `shouldBe` badRequest400