summaryrefslogtreecommitdiff
path: root/lib/Kiki.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Kiki.hs')
-rw-r--r--lib/Kiki.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Kiki.hs b/lib/Kiki.hs
index bdf8932..3bc6330 100644
--- a/lib/Kiki.hs
+++ b/lib/Kiki.hs
@@ -351,6 +351,7 @@ refreshCache rt rootdir = do
351 ipsecs :: [Packet] 351 ipsecs :: [Packet]
352 ipsecs = sortOn (Down . timestamp) 352 ipsecs = sortOn (Down . timestamp)
353 $ getSubkeys CrossSigned their_master (keySubKeys kd) "ipsec" 353 $ getSubkeys CrossSigned their_master (keySubKeys kd) "ipsec"
354 ++ getSubkeys CrossSigned their_master (keySubKeys kd) "strongswan"
354 bss <- forM (take 1 ipsecs) $ \k -> do 355 bss <- forM (take 1 ipsecs) $ \k -> do
355 let warn' x = warn x >> return Char8.empty 356 let warn' x = warn x >> return Char8.empty
356 flip (either warn') (pemFromPacket k :: Either String String) $ \pem -> do 357 flip (either warn') (pemFromPacket k :: Either String String) $ \pem -> do