diff --git a/test/Network/Gemini/Capsule/InternalSpec.hs b/test/Network/Gemini/Capsule/InternalSpec.hs index ba864d9..8746978 100644 --- a/test/Network/Gemini/Capsule/InternalSpec.hs +++ b/test/Network/Gemini/Capsule/InternalSpec.hs @@ -97,7 +97,7 @@ readMaxSpec = describe "readMax" $ mapM_ readMax maxLen conn `shouldReturn` expect ) - -- description, max length, connection, expected + -- description, max length, connection, expected [ ( "single input", 1024, singleConn, Just singleBS ) , ( "multi input", 1024, multiConn, Just multiBS ) , ( "long input", longLen, longConn, Just longBS )