tweak
This commit is contained in:
parent
2fd17d628c
commit
1af0cb35b6
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue