From 9df409d2fb8aeb63d40255737420698df3c21f08 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 1 Apr 2014 13:07:55 -0400 Subject: fix --- Propellor/Property/Docker.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Propellor') diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs index 92f59274..c6a2bc7f 100644 --- a/Propellor/Property/Docker.hs +++ b/Propellor/Property/Docker.hs @@ -190,7 +190,7 @@ stopContainer cid = boolSystem dockercmd [Param "stop", Param $ fromContainerId removeContainer :: ContainerId -> IO () removeContainer cid = void $ catchMaybeIO $ - readProcess "sh" [Param "-c", Param $ dockercmd ++ " rm " ++ fromContainerId cid ] + readProcess dockercmd ["rm", fromContainerId cid ] runContainer :: Image -> [RunParam] -> [String] -> IO Bool runContainer image ps cmd = boolSystem dockercmd $ map Param $ -- cgit v1.2.3