summaryrefslogtreecommitdiff
path: root/src/Propellor/Info.hs
diff options
context:
space:
mode:
authorJoey Hess2015-01-04 15:36:10 -0400
committerJoey Hess2015-01-04 15:36:53 -0400
commit52664e622084b2986bc123f9725a0243a6794ace (patch)
treef2cb0141d42c2919ecb521a212d3845a6e4b02c1 /src/Propellor/Info.hs
parent0f41071cb5b2b41b7128b38ff33779c7b9e68cbd (diff)
sshPubKey is renamed to Ssh.pubKey
Diffstat (limited to 'src/Propellor/Info.hs')
-rw-r--r--src/Propellor/Info.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/src/Propellor/Info.hs b/src/Propellor/Info.hs
index 3af3fc15..b7ca81b5 100644
--- a/src/Propellor/Info.hs
+++ b/src/Propellor/Info.hs
@@ -70,13 +70,6 @@ addDNS r = pureInfoProperty (rdesc r) $ mempty { _dns = S.singleton r }
ddesc (RelDomain domain) = domain
ddesc RootDomain = "@"
-sshPubKey :: String -> Property
-sshPubKey k = pureInfoProperty ("ssh pubkey known") $
- mempty { _sshPubKey = Val k }
-
-getSshPubKey :: Propellor (Maybe String)
-getSshPubKey = askInfo _sshPubKey
-
hostMap :: [Host] -> M.Map HostName Host
hostMap l = M.fromList $ zip (map hostName l) l