Unresricted import of Data.Binary in KeyRing (for decodeOrFail)

1 files changed, 1 insertions, 1 deletions

diff --git a/KeyRing.hs b/KeyRing.hs
index 66771f6..d9fae5f 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -26,7 +26,7 @@ import Data.OpenPGP.Util (verify,fingerprint,decryptSecretKey,pgpSign)
 import Data.ByteString.Lazy   ( ByteString )
 import Text.Show.Pretty as PP ( ppShow )
 import Data.Word ( Word8 )
-import Data.Binary ( decode )
+import Data.Binary {- decode, decodeOrFail -}
 import ControlMaybe ( handleIO_ )
 import Data.ASN1.Types ( toASN1, ASN1Object, fromASN1
        , ASN1(Start,End,IntVal,OID,BitString), ASN1ConstructionType(Sequence) )