mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed a different way this test case could fail in LANG=C

Browse source
This commit is contained in:
Joey Hess 2019-01-21 16:46:40 -04:00
parent ac858df32c
commit f603fc252d
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
Logs/Remote.hs
View file

@ -95,7 +95,8 @@ prop_parse_show_Config c
-- whitespace and '=' are not supported in config keys
| any (\k -> any isSpace k || elem '=' k) (M.keys c) = True
-- limit to alphanumerics for simplicity
| any (not . all isAlphaNum) (M.keys c) = True
| any (any (not . isAlphaNum)) (M.keys c) = True
| any (any (not . isAlphaNum)) (M.elems c) = True
| otherwise = A.parseOnly remoteConfigParser (encodeBS $ showConfig c) ~~ Right c
where
normalize v = sort . M.toList <$> v