propellor spin
This commit is contained in:
parent
29f3337034
commit
f8b71c0ab4
|
@ -489,7 +489,7 @@ runContainer image ps cmd = boolSystem dockercmd $ map Param $
|
|||
"run" : (ps ++ image : cmd)
|
||||
|
||||
inContainer :: ContainerId -> [String] -> [String] -> (Handle -> IO a) -> IO a
|
||||
inContainer cid ps cmd = withHandle StdinHandle createProcessSuccess
|
||||
inContainer cid ps cmd = withHandle StdoutHandle createProcessSuccess
|
||||
(proc dockercmd ("exec" : ps ++ [fromContainerId cid] ++ cmd))
|
||||
|
||||
commitContainer :: ContainerId -> IO (Maybe Image)
|
||||
|
|
Loading…
Reference in New Issue