summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--test/Test.hs2
1 files changed, 1 insertions, 1 deletions
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))
]