diff options
Diffstat (limited to 'crypto/objects/objxref.pl')
| -rw-r--r-- | crypto/objects/objxref.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/crypto/objects/objxref.pl b/crypto/objects/objxref.pl index 731d3ae..6c4c832 100644 --- a/crypto/objects/objxref.pl +++ b/crypto/objects/objxref.pl @@ -90,7 +90,10 @@ EOF foreach (@srt2) { - my $x = $xref_tbl{$_}[2]; + my ($p1, $p2, $x) = @{$xref_tbl{$_}}; + # If digest or signature algorithm is "undef" then the algorithm + # needs special handling and is excluded from the cross reference table. + next if $p1 eq "undef" || $p2 eq "undef"; print "\t\&sigoid_srt\[$x\],\n"; } |