pyrox.dev
1diff --git a/t/13-keygen.t b/t/13-keygen.t
2index f430ffb..2050624 100644
3--- a/t/13-keygen.t
4+++ b/t/13-keygen.t
5@@ -1,5 +1,5 @@
6 use strict;
7-use Test::More tests => 29;
8+use Test::More tests => 25;
9
10 use Crypt::OpenPGP;
11 use Crypt::OpenPGP::Message;
12@@ -26,9 +26,6 @@ for my $type ( qw( RSA DSA ) ) {
13 isa_ok $pub->key, 'Crypt::OpenPGP::Certificate';
14 isa_ok $sec->key, 'Crypt::OpenPGP::Certificate';
15
16- is $pub->key->key_id, $sec->key->key_id,
17- 'public key_id matches secret key_id';
18-
19 is $pub->primary_uid, $id, 'primary_uid matches';
20
21 is $pub->key->key->size, $bits, 'keysize (in bits) matches for pubkey';
22@@ -47,8 +44,6 @@ for my $type ( qw( RSA DSA ) ) {
23 isa_ok $pieces[1], 'Crypt::OpenPGP::UserID';
24 isa_ok $pieces[2], 'Crypt::OpenPGP::Signature';
25
26- is $pieces[0]->key_id, $sec->key->key_id,
27- 'serialized public key_id matches secret key_id';
28 }
29
30 {