summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordefanor <defanor@uberspace.net>2017-12-17 00:55:12 +0300
committerdefanor <defanor@uberspace.net>2017-12-17 00:55:12 +0300
commit16a3509836691ff9a43a0a8920d615ba91f8a74f (patch)
treeaee64870168009e78f717ce3951fc1f90803b2a3
parent0b0fa3eb647707d6612519399511298d3e9d236c (diff)
downloadcoalpit-16a3509836691ff9a43a0a8920d615ba91f8a74f.zip
coalpit-16a3509836691ff9a43a0a8920d615ba91f8a74f.tar.gz
coalpit-16a3509836691ff9a43a0a8920d615ba91f8a74f.tar.bz2
Adjust a test name
-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))
]