diff options
-rw-r--r-- | lib/Kiki.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/Kiki.hs b/lib/Kiki.hs index 8a1878b..be15224 100644 --- a/lib/Kiki.hs +++ b/lib/Kiki.hs | |||
@@ -271,6 +271,10 @@ refreshCache rt rootdir = do | |||
271 | (mkpath "ssh_host_rsa_key") | 271 | (mkpath "ssh_host_rsa_key") |
272 | "missing ssh host key?" | 272 | "missing ssh host key?" |
273 | 273 | ||
274 | writeSecret "tor" | ||
275 | (mkpath "tor/private_key") | ||
276 | "missing tor key?" | ||
277 | |||
274 | -- Finally, export public keys if they do not exist. | 278 | -- Finally, export public keys if they do not exist. |
275 | either warn (write $ mkpath "root/.ssh/id_rsa.pub") | 279 | either warn (write $ mkpath "root/.ssh/id_rsa.pub") |
276 | $ show_ssh' "ssh-client" grip (rtKeyDB rt) | 280 | $ show_ssh' "ssh-client" grip (rtKeyDB rt) |