summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Group.hs
diff options
context:
space:
mode:
authorJoey Hess2016-03-26 14:48:24 -0400
committerJoey Hess2016-03-26 14:48:24 -0400
commit551a7ec8bd7486ea599271c99236ceffa1743e5a (patch)
treee861d4dcf2ce5e0b809ca6e70e26cfac27b30178 /src/Propellor/Property/Group.hs
parent3218e344d117701066ced6c13927318ea2938ad4 (diff)
more porting
Diffstat (limited to 'src/Propellor/Property/Group.hs')
-rw-r--r--src/Propellor/Property/Group.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Group.hs b/src/Propellor/Property/Group.hs
index f91ef1c2..58e49a86 100644
--- a/src/Propellor/Property/Group.hs
+++ b/src/Propellor/Property/Group.hs
@@ -4,7 +4,7 @@ import Propellor.Base
type GID = Int
-exists :: Group -> Maybe GID -> Property NoInfo
+exists :: Group -> Maybe GID -> Property UnixLike
exists (Group group') mgid = check test (cmdProperty "addgroup" (args mgid))
`describe` unwords ["group", group']
where