This commit is contained in:
Joey Hess 2014-03-30 20:50:33 -04:00
parent dbdd18e0e1
commit 409cb20373
1 changed files with 4 additions and 1 deletions

View File

@ -8,7 +8,10 @@ import qualified Property.Apt as Apt
import Property.User
{- Allows a user to sudo. If the user has a password, sudo is configured
- to require it. If not, NOPASSWORD is enabled for the user. -}
- to require it. If not, NOPASSWORD is enabled for the user.
-
- TOOD: Full sudoers file format parse..
-}
enabledFor :: UserName -> Property
enabledFor user = Property desc go `requires` Apt.installed ["sudo"]
where