summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/User.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-02-04 17:07:32 -0400
committerJoey Hess <joeyh@joeyh.name>2017-02-04 17:07:32 -0400
commit8f37ddf53da31987f3db01d51fd9119d1e0c8a1d (patch)
tree786d557ab7d083137e1bf0a18a5eae1c5fd9d18d /src/Propellor/Property/User.hs
parent5ff45a37b1ffde8fe9150815d81236354c89e20b (diff)
parent25f6871e1dda3de252fbc6c8ac6962eb0cd9311a (diff)
Merge remote-tracking branch 'wzhd/archlinux'
Diffstat (limited to 'src/Propellor/Property/User.hs')
-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 76eae647..0c7e48f2 100644
--- a/src/Propellor/Property/User.hs
+++ b/src/Propellor/Property/User.hs
@@ -43,7 +43,7 @@ systemAccountFor' (User u) mhome mgroup = tightenTargets $ check nouser go
]
-- | Removes user home directory!! Use with caution.
-nuked :: User -> Eep -> Property DebianLike
+nuked :: User -> Eep -> Property Linux
nuked user@(User u) _ = tightenTargets $ check hashomedir go
`describe` ("nuked user " ++ u)
where