1 files changed, 2 insertions, 3 deletions

diff --git a/kiki.hs b/kiki.hs
index 8e49086..ace9077 100644
--- a/kiki.hs
+++ b/kiki.hs
@@ -23,8 +23,7 @@ import Control.Monad
 import qualified Text.Show.Pretty as PP
 import Text.PrettyPrint as PP hiding ((<>))
 import Data.List
--- import Data.OpenPGP.CryptoAPI (verify,fingerprint,sign,decryptSecretKey)
-import OpenPGP
+import Data.OpenPGP.Util (verify,fingerprint,decryptSecretKey,pgpSign)
 import Data.Ord
 import Data.Maybe
 import Data.Bits
@@ -714,7 +713,7 @@ expandPath path []                 = []
 
 readPacketsFromFile :: FilePath -> IO Message
 readPacketsFromFile fname = do
-    warn $ fname ++ ": reading..."
+    -- warn $ fname ++ ": reading..."
     input <- L.readFile fname
     return $
       case decodeOrFail input of