summaryrefslogtreecommitdiff
path: root/Propellor
diff options
context:
space:
mode:
authorJoey Hess2014-04-11 00:51:21 -0400
committerJoey Hess2014-04-11 00:51:21 -0400
commit9a32955f0ca9a09eb0375bf1f8bf624308bdab40 (patch)
treed33d86cccfd688a7610aee2dd6073ba31b0e4b2e /Propellor
parent0274aec9491a4bacfc15ec302c9280a0d88046a1 (diff)
propellor spin
Diffstat (limited to 'Propellor')
-rw-r--r--Propellor/Property/Docker.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Propellor/Property/Docker.hs b/Propellor/Property/Docker.hs
index b75b2bfc..d2555ea5 100644
--- a/Propellor/Property/Docker.hs
+++ b/Propellor/Property/Docker.hs
@@ -219,7 +219,7 @@ fromContainerId :: ContainerId -> String
fromContainerId (ContainerId hn cn) = cn++"."++hn++myContainerSuffix
containerHostName :: ContainerId -> HostName
-containerHostName (ContainerId _ cn) = cn
+containerHostName (ContainerId _ cn) = cn2hn cn
myContainerSuffix :: String
myContainerSuffix = ".propellor"