diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Propellor/Spin.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Propellor/Spin.hs b/src/Propellor/Spin.hs index 42f7bf7b..a6744bf4 100644 --- a/src/Propellor/Spin.hs +++ b/src/Propellor/Spin.hs @@ -101,7 +101,9 @@ getSshTarget target hst where go (Left e) = useip (show e) go (Right hostentry) = ifM (anyM matchingconfig (BSD.hostAddresses hostentry)) - ( return target + ( do + print "MATCHING IP" + return target , do ips <- mapM inet_ntoa (BSD.hostAddresses hostentry) useip ("DNS " ++ show ips ++ " vs configured " ++ show configips) |