From b085e63aa78e7b0cdb57e6e42cee8db040c2edef Mon Sep 17 00:00:00 2001 From: Freezeboy Date: Tue, 28 Jul 2015 01:27:20 +0200 Subject: [PATCH] Removing output from test --- servant-js/test/Servant/JSSpec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/servant-js/test/Servant/JSSpec.hs b/servant-js/test/Servant/JSSpec.hs index 772e05e2..be338901 100644 --- a/servant-js/test/Servant/JSSpec.hs +++ b/servant-js/test/Servant/JSSpec.hs @@ -148,7 +148,7 @@ generateJSSpec n gen = describe specLabel $ do parseFromString jsStr `shouldSatisfy` isRight where specLabel = "generateJS(" ++ (show n) ++ ")" - output = putStrLn + output _ = return () genJS req = gen req header :: TestNames -> String -> String -> String header v headerName headerValue