From a5ce5539520f63d83624388b0f2ac92bc195b002 Mon Sep 17 00:00:00 2001
From: joe <joe@jerkface.net>
Date: Sat, 23 Apr 2016 19:35:32 -0400
Subject: Debug print for "merge" command.

---
 kiki.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'kiki.hs')

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 ()
-- 
cgit v1.2.3