summaryrefslogtreecommitdiff
path: root/src/Propellor/Property
diff options
context:
space:
mode:
authorJoey Hess2014-10-23 12:11:07 -0400
committerJoey Hess2014-10-23 12:11:43 -0400
commit73a75cbefc242133b921fe7314e596ea12bdfbea (patch)
tree17c184354d7bd4d2f5ce3d862ebdff2e13d124c6 /src/Propellor/Property
parent5c480fc9e7279d76e5fe4dbab8b339a71de3bc67 (diff)
Fix loop when a docker host that does not exist was docked.
The problem is it fell back to looking for an alias for the bad hostname, but to get the aliases, it needs to know which hosts are docked where, so looped.
Diffstat (limited to 'src/Propellor/Property')
-rw-r--r--src/Propellor/Property/Docker.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Propellor/Property/Docker.hs b/src/Propellor/Property/Docker.hs
index b717fe19..c91530c3 100644
--- a/src/Propellor/Property/Docker.hs
+++ b/src/Propellor/Property/Docker.hs
@@ -107,7 +107,7 @@ docked hosts cn = RevertableProperty
let cid = ContainerId hn cn
ensureProperties [findContainer mhost cid cn $ a cid]
- mhost = findHost hosts (cn2hn cn)
+ mhost = findHostNoAlias hosts (cn2hn cn)
setup cid (Container image runparams) =
provisionContainer cid