diff options
author | James Crayne <jim.crayne@gmail.com> | 2016-04-26 23:34:18 -0400 |
---|---|---|
committer | James Crayne <jim.crayne@gmail.com> | 2016-04-26 23:34:18 -0400 |
commit | 03f389091cf73cd4a2017dca2269ffae74269ba9 (patch) | |
tree | abfe9af6145409f23ac41962901b1a2c11dd3801 /lib/Kiki.hs | |
parent | 1bf85f3bbd62555d18f9b3ff064a8921048405e4 (diff) |
port to process<1.2
Diffstat (limited to 'lib/Kiki.hs')
-rw-r--r-- | lib/Kiki.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Kiki.hs b/lib/Kiki.hs index be15224..6b4ee83 100644 --- a/lib/Kiki.hs +++ b/lib/Kiki.hs | |||
@@ -235,7 +235,7 @@ refreshCache rt rootdir = do | |||
235 | -- sshspathpub0 = fromMaybe "" rootdir ++ "/etc/ssh/ssh_host_rsa_key.pub" | 235 | -- sshspathpub0 = fromMaybe "" rootdir ++ "/etc/ssh/ssh_host_rsa_key.pub" |
236 | -- contactipsec0 = fromMaybe "" rootdir ++ "/etc/ipsec.d/certs/%(onion).pem" | 236 | -- contactipsec0 = fromMaybe "" rootdir ++ "/etc/ipsec.d/certs/%(onion).pem" |
237 | 237 | ||
238 | callCommand ("rm -rf "++ mkpath "*") -- clean up, in case gpg altered the keyring. | 238 | readProcessWithExitCode "rm" ["-rf", mkpath "*"] "" -- clean up, in case gpg altered the keyring. |
239 | 239 | ||
240 | flip (maybe $ warn "missing working key?") (rtWorkingKey rt) $ \wk -> do | 240 | flip (maybe $ warn "missing working key?") (rtWorkingKey rt) $ \wk -> do |
241 | 241 | ||