From dc1ea78355139f0cd8a67e64c5e2a3795339a625 Mon Sep 17 00:00:00 2001
From: Andrew Cady <d@jerkface.net>
Date: Tue, 6 May 2014 18:12:39 -0400
Subject: build

---
 KeyRing.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/KeyRing.hs b/KeyRing.hs
index cc45269..c2e209c 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -2403,7 +2403,9 @@ readPacketsFromFile ctx fname = do
     return $
       case decodeOrFail input of
         Right (_,_,msg ) -> msg
-        Left  (_,_,_)    -> trace (fname++": read fail") $ Message []
+        Left  (_,_,_)    ->
+        --trace (fname++": read fail") $
+          Message []
 #else
     return $ decode input
 #endif
-- 
cgit v1.2.3