summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--kiki.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/kiki.hs b/kiki.hs
index b7092dc..555ca92 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -729,7 +729,7 @@ sync bExport bSecret cmdarg args_raw = do
729 else ConstRef 729 else ConstRef
730 pems = flip map keypairs 730 pems = flip map keypairs
731 $ \(usage,path,cmd) -> 731 $ \(usage,path,cmd) ->
732 let cmd' = guard (not $ null cmd) >> return cmd 732 let cmd' = mfilter (not . null) (Just cmd)
733 in if bExport 733 in if bExport
734 then (ArgFile path, (MutableRef cmd', PEMFile usage)) 734 then (ArgFile path, (MutableRef cmd', PEMFile usage))
735 else if isNothing cmd' 735 else if isNothing cmd'