diff --git a/tests/AutoTest.hs b/tests/AutoTest.hs index e65960b9..00ddd304 100644 --- a/tests/AutoTest.hs +++ b/tests/AutoTest.hs @@ -31,7 +31,7 @@ instance Arbitrary QFilePath where newtype QChar = QChar {fromQChar :: Char} instance Arbitrary QChar where - arbitrary = fmap QChar $ elements "?|./:\\abcd 123;_" + arbitrary = fmap QChar $ elements "?./:\\a ;_"