1 files changed, 1 insertions, 0 deletions
diff --git a/kiki.hs b/kiki.hs
index 087e24f..0be591d 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -1280,6 +1280,7 @@ kiki "merge" args | "--help" `elem` args = do
    kiki "merge" []
    -- TODO: more help
 kiki "merge" args = do
+    hPutStrLn stderr $ show op
    KikiResult rt report <- runKeyRing op
    case rt of
      KikiSuccess rt -> return ()

diff --git a/kiki.hs b/kiki.hs index 087e24f..0be591d 100644 --- a/kiki.hs +++ b/kiki.hs
@@ -1280,6 +1280,7 @@ kiki "merge" args \| "--help" `elem` args = do
1280	kiki "merge" []	1280	kiki "merge" []
1281	-- TODO: more help	1281	-- TODO: more help
1282	kiki "merge" args = do	1282	kiki "merge" args = do
		1283	hPutStrLn stderr $ show op
1283	KikiResult rt report <- runKeyRing op	1284	KikiResult rt report <- runKeyRing op
1284	case rt of	1285	case rt of
1285	KikiSuccess rt -> return ()	1286	KikiSuccess rt -> return ()