No private key data on command line.

1 files changed, 4 insertions, 1 deletions

diff --git a/kiki.hs b/kiki.hs
index 6b2eb63..edc36d6 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -2026,7 +2026,10 @@ main = do
                                      , ("--show-wip",1)
                                      , ("--help",0)
                                      ]
-                          argspec = map fst sargspec ++ ["--keyrings","--keypairs","--wallets","--bitcoin-keypairs"]
+                          argspec = map fst sargspec ++ ["--keyrings","--keypairs","--wallets"] 
+                                        -- "--bitcoin-keypairs"
+                                        -- Disabled.  We shouldn't accept private key
+                                        -- data on the command line.
                           args' = if map (take 1) (take 1 vargs) == ["-"]
                                     then vargs
                                     else "--keyrings":vargs