summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2016-08-30 00:46:48 -0400
committerjoe <joe@jerkface.net>2016-08-30 00:46:48 -0400
commitfe847ffb3bd02fb661f1cb86532cee8186c1e82c (patch)
tree6dd10a3564e01122243f731e141b9fe682070c2a /lib
parent8c7186a839964c10f94f6d21e1aa00c1cf652429 (diff)
oops: only ipsec was going to /var/cache/kiki
Diffstat (limited to 'lib')
-rw-r--r--lib/Kiki.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Kiki.hs b/lib/Kiki.hs
index f9d4a4e..70d5ed6 100644
--- a/lib/Kiki.hs
+++ b/lib/Kiki.hs
@@ -393,7 +393,7 @@ refreshCache rt rootdir = do
393 393
394 let writeSecret tag path warning = do 394 let writeSecret tag path warning = do
395 let my_ks :: [Packet] 395 let my_ks :: [Packet]
396 my_ks = getSecret "ipsec" 396 my_ks = getSecret tag
397 case my_ks of 397 case my_ks of
398 se0:_ -> do sc1 <- rtPassphrases rt (Unencrypted,S2K 100 "") $ MappedPacket se0 Map.empty 398 se0:_ -> do sc1 <- rtPassphrases rt (Unencrypted,S2K 100 "") $ MappedPacket se0 Map.empty
399 let sec = case sc1 of 399 let sec = case sc1 of