summaryrefslogtreecommitdiff
path: root/Propellor/Property/Hostname.hs
blob: 8daf6bb2910787160c54302b96ca49eda1c9056e (plain)
1
2
3
4
5
6
7
8
9
module Propellor.Property.Hostname where

import Propellor.Common
import qualified Propellor.Property.File as File

set :: HostName -> Property
set hostname = "/etc/hostname" `File.hasContent` [hostname]
	`onChange` cmdProperty "hostname" [Param hostname]
	`describe` ("hostname " ++ hostname)