summaryrefslogtreecommitdiff
path: root/BackendTypes.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-01-30 12:01:56 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-01-30 12:13:34 -0400
commit1b0edc1ab2f3516dc532b0cf4ea39a0af2f6392f (patch)
tree2f552619d5f283672c79d405c709661a6046c8ec /BackendTypes.hs
parent96e561bc477bd0a4bbffb769369fabe1e1e1982f (diff)
idiomatic elem
Diffstat (limited to 'BackendTypes.hs')
-rw-r--r--BackendTypes.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/BackendTypes.hs b/BackendTypes.hs
index fd4a61b98..c4927ab20 100644
--- a/BackendTypes.hs
+++ b/BackendTypes.hs
@@ -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)