This commit is contained in:
Joey Hess 2014-03-30 00:33:45 -04:00
parent 3368bdd0a1
commit 38e626da7f
1 changed files with 3 additions and 4 deletions

View File

@ -6,7 +6,6 @@ import Utility.SafeCommand
type HostName = String
set :: HostName -> Property
set hostname = combineProperties ("hostname " ++ hostname)
[ fileHasContent "/etc/hostname" [hostname]
, cmdProperty "hostname" [Param hostname]
]
set hostname =
fileHasContent "/etc/hostname" [hostname]
`onChange` cmdProperty "hostname" [Param hostname]