From 41a23743e7f5b90c12a2b2ef19ccb3dcbb7bfef9 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Wed, 23 Jul 2014 12:27:38 -0400
Subject: propellor spin

---
 src/Propellor/Property/Ssh.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Propellor/Property')

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
-- 
cgit v1.3-2-g0d8e