summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm
diff options
context:
space:
mode:
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm')
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm
index 744ca7228b..debfc2d1af 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/Fatal.pm
@@ -55,7 +55,7 @@ use constant ERROR_58_HINTS => q{Non-subroutine %s hints for %s are not supporte
use constant MIN_IPC_SYS_SIMPLE_VER => 0.12;
-our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg::Version
+our $VERSION = '2.36'; # VERSION: Generated by DZP::OurPkg::Version
our $Debug ||= 0;
@@ -170,6 +170,8 @@ my %TAGS = (
':2.32' => [qw(:default)],
':2.33' => [qw(:default)],
':2.34' => [qw(:default)],
+ ':2.35' => [qw(:default)],
+ ':2.36' => [qw(:default)],
);
@@ -1088,6 +1090,7 @@ sub _one_invocation {
my $code = qq[
no warnings qw(unopened uninitialized numeric);
no if \$\] >= 5.017011, warnings => "experimental::smartmatch";
+ no if \$warnings::Offsets{"deprecated::smartmatch"}, warnings => "deprecated";
if (wantarray) {
my \@results = $call(@argv);