From 16a3509836691ff9a43a0a8920d615ba91f8a74f Mon Sep 17 00:00:00 2001 From: defanor Date: Sun, 17 Dec 2017 00:55:12 +0300 Subject: Adjust a test name --- test/Test.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/Test.hs b/test/Test.hs index 1771202..8ef6a3a 100644 --- a/test/Test.hs +++ b/test/Test.hs @@ -135,7 +135,7 @@ qcProps = testGroup "Quickcheck properties" [ testGroup "Right == fromArgs opt . toArgs opt" (variousOptions $ \opt -> variousTypes $ \p n -> QC.testProperty n (printAndParse opt p)) - , testGroup "xs == rights (readDSV opt (showDSV opt xs))" + , testGroup "id == rights . readDSV opt . showDSV opt" (variousOptions $ \opt -> variousTypes $ \p n -> QC.testProperty n (printAndParseDSV opt p)) ] -- cgit v1.2.3