diff options
Diffstat (limited to 'Property')
| -rw-r--r-- | Property/Hostname.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Property/Hostname.hs b/Property/Hostname.hs index 03293eb1..0529d213 100644 --- a/Property/Hostname.hs +++ b/Property/Hostname.hs @@ -1,8 +1,12 @@ module Property.Hostname where import Property +import Utility.SafeCommand type HostName = String set :: HostName -> Property -set hostname = fileHasContent "/etc/hostname" [hostname] +set hostname = combineProperties ("hostname " ++ hostname) + [ fileHasContent "/etc/hostname" [hostname] + , cmdProperty "hostname" [Param hostname] + ] |