Commit 95791bf9 authored by Dr. Stephen Henson's avatar Dr. Stephen Henson
Browse files

Fix OID encoding for one component. 

OIDs with one component don't have an encoding.

PR#2556 (Bug#1)
parent d2aea038

crypto/objects/obj_dat.pl

+1 −1
Original line number Diff line number Diff line
@@ -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;