summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Ssh.hs
diff options
context:
space:
mode:
authorJoey Hess2014-07-23 12:27:38 -0400
committerJoey Hess2014-07-23 12:27:38 -0400
commit41a23743e7f5b90c12a2b2ef19ccb3dcbb7bfef9 (patch)
tree9babc78e0570a74ca04c82cac5debff27f6ff526 /src/Propellor/Property/Ssh.hs
parentde50ea480dee911f0c65cce2425145561566b1fe (diff)
propellor spin
Diffstat (limited to 'src/Propellor/Property/Ssh.hs')
-rw-r--r--src/Propellor/Property/Ssh.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Property/Ssh.hs b/src/Propellor/Property/Ssh.hs
index 76f03671..5a260476 100644
--- a/src/Propellor/Property/Ssh.hs
+++ b/src/Propellor/Property/Ssh.hs
@@ -148,8 +148,8 @@ knownHost hosts hn user = property desc $
, f `File.containsLine` (hn ++ " " ++ k)
, File.ownerGroup f user user
]
- go v = do
- warningMessage $ "no configred sshPubKey for " ++ hn ++ " " ++ show v
+ go _ = do
+ warningMessage $ "no configred sshPubKey for " ++ hn
return FailedChange
-- | Makes a user have authorized_keys from the PrivData