No private key data on command line.

Conflicts:
	kiki.hs

1 files changed, 4 insertions, 0 deletions

diff --git a/kiki.hs b/kiki.hs
index 7c77f64..196d080 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -1636,9 +1636,13 @@ main = do
                                      , ("--show-wk",0)
                                      , ("--show-all",0)
                                      , ("--show-pem",1)
+                                     , ("--show-wip",1)
                                      , ("--help",0)
                                      ]
                           argspec = map fst sargspec ++ ["--keyrings","--keypairs"]
+                                        -- "--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