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

idiomatic elem

Browse source
This commit is contained in:
Joey Hess 2011-01-30 12:01:56 -04:00
commit 1b0edc1ab2
5 changed files with 10 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

2
BackendTypes.hs
View file

@ -75,5 +75,5 @@ instance Arbitrary Key where
prop_idempotent_key_read_show :: Key -> Bool
prop_idempotent_key_read_show k
-- backend names will never contain colons
| elem ':' (backendName k) = True
| ':' `elem` (backendName k) = True
| otherwise = k == (read $ show k)