@@ -1,6 +1,6 @@ Revision history for autodie -2.03 +2.03 Wed Jul 1 15:39:16 AUSEST 2009 * BUGFIX: Stopped blog_hints.t from booching under Perl 5.8.x. because parent.pm is not installed. Changes @@ -39,7 +39,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; # All the Fatal/autodie modules share the same version number. -our $VERSION = '2.02'; +our $VERSION = '2.03'; our $Debug ||= 0; @@ -97,6 +97,7 @@ my %TAGS = ( ':2.00' => [qw(:default)], ':2.01' => [qw(:default)], ':2.02' => [qw(:default)], + ':2.03' => [qw(:default)], ); lib/Fatal.pm @@ -8,7 +8,7 @@ our @ISA = qw(Fatal); our $VERSION; BEGIN { - $VERSION = '2.02'; + $VERSION = '2.03'; } use constant ERROR_WRONG_FATAL => q{ lib/autodie.pm @@ -14,7 +14,7 @@ use overload use if ($] >= 5.010), overload => '~~' => "matches"; -our $VERSION = '2.02'; +our $VERSION = '2.03'; my $PACKAGE = __PACKAGE__; # Useful to have a scalar for hash keys. lib/autodie/exception.pm @@ -5,7 +5,7 @@ use warnings; use base 'autodie::exception'; use Carp qw(croak); -our $VERSION = '2.02'; +our $VERSION = '2.03'; my $PACKAGE = __PACKAGE__; lib/autodie/exception/system.pm @@ -5,7 +5,7 @@ use warnings; use constant PERL58 => ( $] < 5.009 ); -our $VERSION = '2.02'; +our $VERSION = '2.03'; =head1 NAME lib/autodie/hints.pm @@ -28,3 +28,5 @@ isnt("$@",""); is($@->return->[0], undef); is($@->return->[1], 'Insufficient credit'); like("$@", qr/Insufficient credit/); + +warn $@; t/blog_hints.t ab614fe51072617f02fc19a96f85954ad77325c2 Paul Fenwick pjf@perltraining.com.au http://github.com/pfenwick/autodie/commit/45270eb44177315d641df42824f24bbfe2cef4d8 45270eb44177315d641df42824f24bbfe2cef4d8 2009-06-30T22:48:25-07:00 2009-06-30T22:48:25-07:00 Bump to 2.03 and release be047ee4efe32d9a58be232ab0efb65764b2be60 Paul Fenwick pjf@perltraining.com.au