--- lib/GnuPG/Interface.pm.orig 2004-12-05 11:09:00.000000000 +0100 +++ lib/GnuPG/Interface.pm 2004-12-05 11:09:46.000000000 +0100 @@ -543,7 +543,7 @@ $current_key->push_subkeys( $current_signed_item ); } - else + elsif ( $record_type ne 'tru' ) { warn "unknown record type $record_type"; }