From f8b71c0ab4e09a90aeced9a563465c0b89ee1a16 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 19 Nov 2014 00:38:11 -0400 Subject: propellor spin --- src/Propellor/Property/Docker.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/Propellor/Property/Docker.hs b/src/Propellor/Property/Docker.hs index 2b4faf7b..e5d488c1 100644 --- a/src/Propellor/Property/Docker.hs +++ b/src/Propellor/Property/Docker.hs @@ -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) -- cgit v1.2.3