Fix OID encoding for one component.

OIDs with one component don't have an encoding. PR#2556 (Bug#1)

Fix OID encoding for one component.
OIDs with one component don't have an encoding. PR#2556 (Bug#1)
95791bf9 · Dr. Stephen Henson · d2aea038 · 95791bf9
隐藏空白更改
内联并排

Showing with 1 addition and 1 deletion

crypto/objects/obj_dat.pl crypto/objects/obj_dat.pl +1 -1

未找到文件。
--- a/crypto/objects/obj_dat.pl
+++ b/crypto/objects/obj_dat.pl
@@ -115,7 +115,7 @@ for ($i=0; $i<$n; $i++)
 		$out.="\"$sn\"";
 		$out.=","."\"$ln\"";
 		$out.=",NID_$nid{$i},";
-		if (defined($obj{$nid{$i}}))
+		if (defined($obj{$nid{$i}}) && $objd{$obj{$nid{$i}}} =~ /,/)
 			{
 			$v=$objd{$obj{$nid{$i}}};
 			$v =~ s/L//g;