diff options
Diffstat (limited to 'dev-perl/Exception-Base/files/Exception-Base-0.2501-perl-5.38.patch')
| -rw-r--r-- | dev-perl/Exception-Base/files/Exception-Base-0.2501-perl-5.38.patch | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/dev-perl/Exception-Base/files/Exception-Base-0.2501-perl-5.38.patch b/dev-perl/Exception-Base/files/Exception-Base-0.2501-perl-5.38.patch new file mode 100644 index 000000000000..64168cfa39a8 --- /dev/null +++ b/dev-perl/Exception-Base/files/Exception-Base-0.2501-perl-5.38.patch @@ -0,0 +1,15 @@ +https://bugs.gentoo.org/928246 +https://github.com/dex4er/perl-Exception-Base/issues/5 + +--- a/t/tlib/Exception/BaseTest.pm ++++ b/t/tlib/Exception/BaseTest.pm +@@ -569,7 +569,8 @@ + $self->assert_matches(qr/String at /, $obj); + + # smart matching for Perl 5.10 +- if ($] >= 5.010) { ++ # Deprecation warning added in 5.37.10 ++ if ($] >= 5.010 && $] < 5.037010) { + no if $] >= 5.018, warnings => 'experimental::smartmatch'; + eval q{ + $self->assert_num_equals(1, 'String' ~~ $obj); |