summaryrefslogtreecommitdiff
path: root/Property
diff options
context:
space:
mode:
authorJoey Hess2014-03-30 00:28:56 -0400
committerJoey Hess2014-03-30 00:28:56 -0400
commit3368bdd0a18a58f10fbec8880562ad63b85bcfd5 (patch)
treeecc22f01c33c19a5bdb1a0b09a3244c2973f75ca /Property
parentc1ad516a6c85d5fc7733151bcae07495e69319ea (diff)
improvements
Diffstat (limited to 'Property')
-rw-r--r--Property/Hostname.hs6
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]
+ ]