forked from pool/perl-Convert-ASN1
Pedro Monreal Gonzalez
65a5d5f713
- updated to 0.31
see /usr/share/doc/packages/perl-Convert-ASN1/ChangeLog
0.31 -- Wed Jun 02 22:28:29 ADT 2021
* Official CPAN release of 0.30
0.30 -- Sat May 29 21:56:29 ADT 2021
* Fixes #43 - Perl 5.35.1 makes scalar assignment to undef a compile time error
- Rebase Convert-ASN1-0.22-test.diff
OBS-URL: https://build.opensuse.org/request/show/897271
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Convert-ASN1?expand=0&rev=32
15 lines
445 B
Diff
15 lines
445 B
Diff
Index: t/00prim.t
|
|
===================================================================
|
|
--- t/00prim.t.orig
|
|
+++ t/00prim.t
|
|
@@ -178,7 +178,8 @@ my %BSTR = (
|
|
[pack("B*",'011011111101110111'), 7, pack("B*", '01101110')]
|
|
);
|
|
|
|
-while(($result,$val) = each %BSTR) {
|
|
+foreach $result (sort(keys %BSTR)) {
|
|
+ $val = $BSTR{$result};
|
|
print "# BIT STRING ", unpack("B*", ref($val) ? $val->[0] : $val),
|
|
" ",(ref($val) ? $val->[1] : $val),"\n";
|
|
|