Test for --max-rows behavior

This commit is contained in:
Joe Nelson
2015-12-05 19:31:53 -08:00
parent cbbb1871bb
commit f4c73c7666
9 changed files with 50 additions and 13 deletions
+1 -1
View File
@@ -9,7 +9,7 @@ import SpecHelper
import Network.HTTP.Types
spec :: Spec
spec = around withApp $ do
spec = around (withApp cfgDefault) $ do
describe "GET /" $ do
it "lists views in schema" $
request methodGet "/" [] ""