"init" now exports secret tor key.

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
                 (mkpath "ssh_host_rsa_key")
                 "missing ssh host key?"
 
+    writeSecret "tor"
+                (mkpath "tor/private_key")
+                "missing tor key?"
+
     -- Finally, export public keys if they do not exist.
     either warn (write $ mkpath "root/.ssh/id_rsa.pub")
             $ show_ssh' "ssh-client" grip (rtKeyDB rt)