fix bug introduced while cleaning

1 files changed, 1 insertions, 1 deletions

diff --git a/kiki.hs b/kiki.hs
index dc1344e..19d6a33 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -703,7 +703,7 @@ main = do
         wallets   = fromMaybe [] $ Map.lookup "--wallets" margs
         passphrase_fd = concat <$> Map.lookup "--passphrase-fd" margs
 
-    unless (any isNothing keypairs0) $ do
+    when (any isNothing keypairs0) $ do
         warn "syntax error"
         exitFailure