2 files changed, 3 insertions, 0 deletions

diff --git a/KeyRing.hs b/KeyRing.hs
index 14d4747..47afb9c 100644
--- a/KeyRing.hs
+++ b/KeyRing.hs
@@ -466,6 +466,8 @@ instance ASN1Object PKCS8_RSAPublicKey where
                   = \xs -> Start Sequence
                          : Start Sequence
                          : OID [1,2,840,113549,1,1,1]
+                         : Null -- Doesn't seem to be neccessary, but i'm adding it
+                                -- to match PEM files I see in the wild.
                          : End Sequence
                          : BitString (toBitArray bs 0)
                          : End Sequence
diff --git a/PEM.hs b/PEM.hs
index f969484..e07b3d4 100644
--- a/PEM.hs
+++ b/PEM.hs
@@ -12,6 +12,7 @@ import ScanningParser
 data PEMBlob = PEMBlob { pemType :: L.ByteString
                        , pemBlob :: L.ByteString
                        }
+ deriving (Eq,Show)
 
 pemParser mtyp = ScanningParser (maybe fndany fndtyp mtyp) pbdy
  where