diff options
Diffstat (limited to 'crypto/objects')
-rw-r--r-- | crypto/objects/obj_dat.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/crypto/objects/obj_dat.pl b/crypto/objects/obj_dat.pl index ebeb243d80..5043daef2a 100644 --- 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; |