--- lib/Crypt/OpenPGP/Ciphertext.pm.orig	Tue Apr 10 15:51:46 2007
+++ lib/Crypt/OpenPGP/Ciphertext.pm	Tue Apr 10 15:52:03 2007
@@ -87,8 +87,8 @@ sub decrypt {
     my $padlen = $cipher->blocksize + 2;
     my $pt = $enc->{prefix} =
         $cipher->decrypt(substr $enc->{ciphertext}, 0, $padlen);
-    return $enc->error("Bad checksum")
-        unless substr($pt, -4, 2) eq substr($pt, -2, 2);
+    # return $enc->error("Bad checksum")
+    #     unless substr($pt, -4, 2) eq substr($pt, -2, 2);
     $cipher->sync unless $enc->{is_mdc};
     $pt = $cipher->decrypt(substr $enc->{ciphertext}, $padlen);
     if ($enc->{is_mdc}) {