support volumes-from
This commit is contained in:
parent
1d07360f74
commit
c62c606c0e
|
@ -158,10 +158,18 @@ publish = runProp "publish"
|
||||||
user :: String -> Containerized Property
|
user :: String -> Containerized Property
|
||||||
user = runProp "user"
|
user = runProp "user"
|
||||||
|
|
||||||
-- | Bind mount a volume
|
-- | Mount a volume
|
||||||
|
-- Create a bind mount with: [host-dir]:[container-dir]:[rw|ro]
|
||||||
|
-- With just a directory, creates a volume in the container.
|
||||||
volume :: String -> Containerized Property
|
volume :: String -> Containerized Property
|
||||||
volume = runProp "volume"
|
volume = runProp "volume"
|
||||||
|
|
||||||
|
-- | Mount a volume from the specified container into the current
|
||||||
|
-- container.
|
||||||
|
volumes_from :: ContainerName -> Containerized Property
|
||||||
|
volumes_from cn = genProp "volumes-rom" $ \hn ->
|
||||||
|
fromContainerId (ContainerId hn cn)
|
||||||
|
|
||||||
-- | Work dir inside the container.
|
-- | Work dir inside the container.
|
||||||
workdir :: String -> Containerized Property
|
workdir :: String -> Containerized Property
|
||||||
workdir = runProp "workdir"
|
workdir = runProp "workdir"
|
||||||
|
|
Loading…
Reference in New Issue