diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-01 12:42:24 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-01 12:42:24 -0400 |
| commit | 1af0cb35b691598b718a10c3de1b61692d4aafd6 (patch) | |
| tree | c009bdfc8e1f25284e27a3301f4ce36284ff86f3 | |
| parent | 2fd17d628c380059f2f4c9faab1de413b99e8716 (diff) | |
tweak
| -rw-r--r-- | Propellor/Property/Docker.hs | 4 | ||||
| -rw-r--r-- | config.hs | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs index 3e19db4f..dd4f1924 100644 --- a/Propellor/Property/Docker.hs +++ b/Propellor/Property/Docker.hs @@ -61,8 +61,8 @@ fromContainerId (ContainerId hn cn) = cn++"@"++hn data Container = Container Image [Containerized Property] -containerFromImage :: Image -> [Containerized Property] -> Container -containerFromImage = Container +containerFrom :: Image -> [Containerized Property] -> Container +containerFrom = Container containerProperties :: (HostName -> ContainerName -> Maybe (Container)) @@ -54,7 +54,7 @@ host _ = Nothing -- | This is where Docker containers are set up. A container -- can vary by hostname where it's used, or be the same everywhere. container :: HostName -> Docker.ContainerName -> Maybe (Docker.Container) -container _ "webserver" = Just $ Docker.containerFromImage "debian" +container _ "webserver" = Just $ Docker.containerFrom "joeyh/debian-unstable" [ Docker.publish "80:80" , Docker.volume "/var/www:/var/www" , Docker.inside |
