diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2021-02-19 13:58:58 +0000 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2021-02-19 14:15:19 +0000 |
commit | ea6c7d00a911c12057d4f534a05e8964d5a4a47a (patch) | |
tree | 9c347b7f817b3fade6c2f5a56fbaac3ff419a45a /cpan | |
parent | 9f96ea80ded61473ce903ba8dd250cafade9ac84 (diff) | |
download | perl-ea6c7d00a911c12057d4f534a05e8964d5a4a47a.tar.gz |
Update autodie to CPAN version 2.34
[DELTA]
2.34 2021-01-22 11:03:19-06:00 America/Chicago
* Remove rt.cpan.org reference.
Diffstat (limited to 'cpan')
-rw-r--r-- | cpan/autodie/lib/Fatal.pm | 4 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie.pm | 7 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/Scope/Guard.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/Scope/GuardStack.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/Util.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/exception.pm | 4 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/exception/system.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/hints.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/lib/autodie/skip.pm | 2 | ||||
-rw-r--r-- | cpan/autodie/t/exception_nonref.t | 11 |
10 files changed, 26 insertions, 12 deletions
diff --git a/cpan/autodie/lib/Fatal.pm b/cpan/autodie/lib/Fatal.pm index 09abfb8536..744ca7228b 100644 --- a/cpan/autodie/lib/Fatal.pm +++ b/cpan/autodie/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.32'; # VERSION: Generated by DZP::OurPkg::Version +our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg::Version our $Debug ||= 0; @@ -168,6 +168,8 @@ my %TAGS = ( ':2.30' => [qw(:default)], ':2.31' => [qw(:default)], ':2.32' => [qw(:default)], + ':2.33' => [qw(:default)], + ':2.34' => [qw(:default)], ); diff --git a/cpan/autodie/lib/autodie.pm b/cpan/autodie/lib/autodie.pm index 8f62d670d8..0c1b9ac04c 100644 --- a/cpan/autodie/lib/autodie.pm +++ b/cpan/autodie/lib/autodie.pm @@ -9,7 +9,7 @@ our $VERSION; # ABSTRACT: Replace functions with ones that succeed or die with lexical scope BEGIN { - our $VERSION = '2.32'; # VERSION: Generated by DZP::OurPkg::Version + our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg::Version } use constant ERROR_WRONG_FATAL => q{ @@ -306,7 +306,7 @@ return an empty list, or a list consisting only of a single undef element. Some builtins (e.g. C<chdir> or C<truncate>) has a call signature that -cannot completely be representated with a Perl prototype. This means +cannot completely be represented with a Perl prototype. This means that some valid Perl code will be invalid under autodie. As an example: chdir(BAREWORD); @@ -392,8 +392,7 @@ C<autodie> with block eval is considered good practice. =head2 REPORTING BUGS Please report bugs via the GitHub Issue Tracker at -L<https://github.com/pjf/autodie/issues> or via the CPAN Request -Tracker at L<https://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie>. +L<https://github.com/pjf/autodie/issues>. =head1 FEEDBACK diff --git a/cpan/autodie/lib/autodie/Scope/Guard.pm b/cpan/autodie/lib/autodie/Scope/Guard.pm index 8ee412bac4..2be221d410 100644 --- a/cpan/autodie/lib/autodie/Scope/Guard.pm +++ b/cpan/autodie/lib/autodie/Scope/Guard.pm @@ -4,7 +4,7 @@ use strict; use warnings; # ABSTRACT: Wrapper class for calling subs at end of scope -our $VERSION = '2.32'; # VERSION +our $VERSION = '2.34'; # VERSION # This code schedules the cleanup of subroutines at the end of # scope. It's directly inspired by chocolateboy's excellent diff --git a/cpan/autodie/lib/autodie/Scope/GuardStack.pm b/cpan/autodie/lib/autodie/Scope/GuardStack.pm index 9b0a906d96..8cb1be1fa2 100644 --- a/cpan/autodie/lib/autodie/Scope/GuardStack.pm +++ b/cpan/autodie/lib/autodie/Scope/GuardStack.pm @@ -6,7 +6,7 @@ use warnings; use autodie::Scope::Guard; # ABSTRACT: Hook stack for managing scopes via %^H -our $VERSION = '2.32'; # VERSION +our $VERSION = '2.34'; # VERSION my $H_KEY_STEM = __PACKAGE__ . '/guard'; my $COUNTER = 0; diff --git a/cpan/autodie/lib/autodie/Util.pm b/cpan/autodie/lib/autodie/Util.pm index 1a04a195c0..95de13eb22 100644 --- a/cpan/autodie/lib/autodie/Util.pm +++ b/cpan/autodie/lib/autodie/Util.pm @@ -14,7 +14,7 @@ our @EXPORT_OK = qw( on_end_of_compile_scope ); -our $VERSION = '2.32'; # VERSION: Generated by DZP::OurPkg:Version +our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg:Version # ABSTRACT: Internal Utility subroutines for autodie and Fatal diff --git a/cpan/autodie/lib/autodie/exception.pm b/cpan/autodie/lib/autodie/exception.pm index d4c14f9f7d..f4035d28c7 100644 --- a/cpan/autodie/lib/autodie/exception.pm +++ b/cpan/autodie/lib/autodie/exception.pm @@ -4,7 +4,9 @@ use strict; use warnings; use Carp qw(croak); -our $VERSION = '2.32'; # VERSION: Generated by DZP::OurPkg:Version +use Scalar::Util qw(blessed); + +our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg:Version # ABSTRACT: Exceptions from autodying functions. our $DEBUG = 0; diff --git a/cpan/autodie/lib/autodie/exception/system.pm b/cpan/autodie/lib/autodie/exception/system.pm index b0e270c056..afe1617c84 100644 --- a/cpan/autodie/lib/autodie/exception/system.pm +++ b/cpan/autodie/lib/autodie/exception/system.pm @@ -5,7 +5,7 @@ use warnings; use parent 'autodie::exception'; use Carp qw(croak); -our $VERSION = '2.32'; # VERSION: Generated by DZP::OurPkg:Version +our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg:Version # ABSTRACT: Exceptions from autodying system(). diff --git a/cpan/autodie/lib/autodie/hints.pm b/cpan/autodie/lib/autodie/hints.pm index c3f83ed0ec..3778cc75dd 100644 --- a/cpan/autodie/lib/autodie/hints.pm +++ b/cpan/autodie/lib/autodie/hints.pm @@ -5,7 +5,7 @@ use warnings; use constant PERL58 => ( $] < 5.009 ); -our $VERSION = '2.32'; # VERSION: Generated by DZP::OurPkg:Version +our $VERSION = '2.34'; # VERSION: Generated by DZP::OurPkg:Version # ABSTRACT: Provide hints about user subroutines to autodie diff --git a/cpan/autodie/lib/autodie/skip.pm b/cpan/autodie/lib/autodie/skip.pm index ad9706caa0..32aba04fa5 100644 --- a/cpan/autodie/lib/autodie/skip.pm +++ b/cpan/autodie/lib/autodie/skip.pm @@ -2,7 +2,7 @@ package autodie::skip; use strict; use warnings; -our $VERSION = '2.32'; # VERSION +our $VERSION = '2.34'; # VERSION # This package exists purely so people can inherit from it, # which isn't at all how roles are supposed to work, but it's diff --git a/cpan/autodie/t/exception_nonref.t b/cpan/autodie/t/exception_nonref.t new file mode 100644 index 0000000000..7fdbc31fc0 --- /dev/null +++ b/cpan/autodie/t/exception_nonref.t @@ -0,0 +1,11 @@ +#!/usr/bin/perl -w +use strict; +use Test::More tests => 1; +use autodie; + +eval { syswrite "xxxxxxxx", \*STDOUT }; +my $err = $@; + +like( $err, qr<xxxxxxxx>, 'expected failure on attempt to write to non-reference' ); + +done_testing(); |