diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Propellor/Property/User.hs | 2 |
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] |