summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Propellor/Property/User.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/User.hs b/src/Propellor/Property/User.hs
index b7bd5e93..6a51703a 100644
--- a/src/Propellor/Property/User.hs
+++ b/src/Propellor/Property/User.hs
@@ -68,4 +68,4 @@ hasGroup user group' = check test $ cmdProperty "adduser"
]
`describe` unwords ["user", user, "in group", group']
where
- test = not <$> elem group' <$> words <$> readProcess "groups" [user]
+ test = not . elem group' . words <$> readProcess "groups" [user]