cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

improve

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Property/Hostname.hs
View File

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