From 8e7b296e820e7513c7846ceeb3fbd87d60bc95f4 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 30 Mar 2014 13:12:33 -0400 Subject: split out Property.FIle --- Property/Hostname.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Property/Hostname.hs') diff --git a/Property/Hostname.hs b/Property/Hostname.hs index 7baf7178..38e9dbe8 100644 --- a/Property/Hostname.hs +++ b/Property/Hostname.hs @@ -1,11 +1,11 @@ module Property.Hostname where import Property +import qualified Property.File as File import Utility.SafeCommand type HostName = String set :: HostName -> Property -set hostname = - fileHasContent "/etc/hostname" [hostname] - `onChange` cmdProperty "hostname" [Param hostname] +set hostname = "/etc/hostname" `File.hasContent` [hostname] + `onChange` cmdProperty "hostname" [Param hostname] -- cgit v1.2.3