diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-01 22:55:32 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-01 22:55:32 -0400 |
| commit | 16668c03f862fcaa6a79890eb56c6d1a04e47f81 (patch) | |
| tree | e681a7b9d8f4d62c6bf9beb82eda817f0eaac54d | |
| parent | 4c1b9c1dda483025f42431501d7c91adde6839e2 (diff) | |
fix
| -rw-r--r-- | Propellor/Property/Docker.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs index dff1d137..d6c5b41b 100644 --- a/Propellor/Property/Docker.hs +++ b/Propellor/Property/Docker.hs @@ -234,7 +234,7 @@ runningContainer cid@(ContainerId hn cn) image containerprops = containerDesc ci -- was already provisioned. So, it must be a reboot, and time to provision -- again. If the flag file doesn't exist, don't provision here. chain :: String -> IO () -chain s = case readish s of +chain s = case toContainerId s of Nothing -> error $ "Invalid ContainerId: " ++ s Just cid -> do changeWorkingDirectory localdir |