Fix typo in asn1.h (PRINTABLESTRING_STRING) and fix a bug in object creation

perl script. It failed if the OID had any zeros in it.
1999-02-13 17:15:32 +00:00
parent 4a71b90deb
commit e4119b9311
3 changed files with 9 additions and 2 deletions
--- a/crypto/objects/obj_dat.pl
+++ b/crypto/objects/obj_dat.pl
@@ -252,7 +252,7 @@ sub der_it
 	$ret.=pack("C*",$a[0]*40+$a[1]);
 	shift @a;
 	shift @a;
-	while ($_=shift(@a))
+	foreach (@a)
 		{
 		@r=();
 		$t=0;