summaryrefslogtreecommitdiff
path: root/src/Propellor
diff options
context:
space:
mode:
authorJoey Hess2018-07-11 13:46:38 -0400
committerJoey Hess2018-07-11 13:46:38 -0400
commitb23f0cf501464bb76d78814aed787284cd6c0cfa (patch)
tree3fd5cc8d766b8992427ef977281e2b8e0ace17ad /src/Propellor
parentd03ab071b7494cf974e22c2bac8506c1cbe67d6a (diff)
remove debug print
Diffstat (limited to 'src/Propellor')
-rw-r--r--src/Propellor/Spin.hs8
1 files changed, 2 insertions, 6 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs
index d3d18b9e..4a945e82 100644
--- a/src/Propellor/Spin.hs
+++ b/src/Propellor/Spin.hs
@@ -144,12 +144,8 @@ spin' mprivdata relay target hst = do
-- the host in it at all, use one of the Host's IPs instead.
getSshTarget :: HostName -> Host -> IO String
getSshTarget target hst
- | null configips = do
- print "no configured IPs"
- return target
- | otherwise = do
- print configips
- go =<< tryIO (dnslookup target)
+ | null configips = return target
+ | otherwise = go =<< tryIO (dnslookup target)
where
go (Left e) = useip (show e)
go (Right addrinfos) = do