diff options
| author | Joey Hess <joey@kitenet.net> | 2014-03-29 23:45:48 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-03-29 23:45:48 -0400 |
| commit | 0ab0216d0b400fae78a6a6916ef9f82ed31dc0fa (patch) | |
| tree | fd006abe430c43d6783482451b6b9626994be160 /Property/Hostname.hs | |
| parent | 0e1b587442fb78bcbf4886b53b85ab64b45215b0 (diff) | |
configure hostname etc
Diffstat (limited to 'Property/Hostname.hs')
| -rw-r--r-- | Property/Hostname.hs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/Property/Hostname.hs b/Property/Hostname.hs new file mode 100644 index 00000000..b4c28a2b --- /dev/null +++ b/Property/Hostname.hs @@ -0,0 +1,15 @@ +module Property.Hostname where + +import Data.List +import System.Posix +import Control.Applicative +import Data.Maybe + +import Property +import Utility.SafeCommand +import Utility.Exception + +type HostName = String + +set :: HostName -> Property +set hostname = fileHasContent "/etc/hostname" [hostname] |