},
'Test::Simple' => {
- 'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302181.tar.gz',
+ 'DISTRIBUTION' => 'EXODIST/Test-Simple-1.302182.tar.gz',
'FILES' => q[cpan/Test-Simple],
'EXCLUDED' => [
qr{^examples/},
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN {
if( $] < 5.008 ) {
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Formatter::TAP; our @ISA = qw(Test2::Formatter::TAP) }
require Exporter;
our @ISA = qw(Exporter);
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
=head1 NAME
package Test::Builder::Tester;
use strict;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test::Builder;
use Symbol;
package Test::Builder::Tester::Color;
use strict;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
require Test::Builder::Tester;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
return warn @_, " at $file line $line\n";
}
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test::Builder::Module;
our @ISA = qw(Test::Builder::Module);
use strict;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test::Builder::Module;
our @ISA = qw(Test::Builder::Module);
use vars qw( @ISA @EXPORT );
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
@EXPORT = qw( run_tests check_tests check_test cmp_results show_space );
@ISA = qw( Exporter );
package Test::Tester::Capture;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test::Builder;
package Test::Tester::CaptureRunner;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test::Tester::Capture;
package Test::Tester::Delegate;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Scalar::Util();
package Test::use::ok;
use 5.005;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
__END__
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
1;
$ENV{TEST2_ACTIVE} = 1;
}
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
my $INST;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::Util qw/pkg_to_file/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/confess croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
our @CARP_NOT = qw/Test2::API Test2::API::Instance Test2::IPC::Driver Test2::Formatter/;
use Carp qw/confess carp/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Scalar::Util qw/blessed/;
use Test2::Util qw/pkg_to_file/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use List::Util qw/first/;
use Test2::Util qw/pkg_to_file/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN {
require Test2::EventFacet;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
use Test2::Util::HashBase;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/croak/;
use List::Util qw/first/;
return unless $event->has_info;
# Do not merge up if one of these is true
- return if first { $event->$_ } qw/causes_fail has_assert has_bailout has_errors has_plan has_subtest/;
+ return if first { $event->$_ } 'causes_fail', 'has_assert', 'has_bailout', 'has_errors', 'has_plan', 'has_subtest';
# Signature if we can squash
return $event->trace_signature;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::Hub();
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Scalar::Util qw/blessed reftype/;
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::EventFacet::Info;
use Carp qw/croak/;
use Scalar::Util qw/reftype/;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use Test2::Util::HashBase;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::EventFacet::Info;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event::Ok; our @ISA = qw(Test2::Event::Ok) }
use Test2::Util::HashBase qw{subevents buffered subtest_id subtest_uuid};
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Scalar::Util qw/reftype/;
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Event; our @ISA = qw(Test2::Event) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::Util::HashBase qw/-details/;
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use Test2::Util::HashBase qw{ -package -no_display -uuid -eid };
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
sub is_list { 1 }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use Test2::Util::HashBase qw{ -pass -no_debug -number };
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use Test2::Util::HashBase qw{ -global -terminate -halt -has_callback -encoding -phase };
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
sub facet_key { 'errors' }
sub is_list { 1 }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
sub is_list { 1 }
sub facet_key { 'hubs' }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
sub is_list { 1 }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/confess/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use vars qw/$AUTOLOAD/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/confess/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use Test2::Util::HashBase qw{ -count -skip -none };
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
sub is_list { 1 }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::EventFacet; our @ISA = qw(Test2::EventFacet) }
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
my %ADDED;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::Util qw/clone_io/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/carp croak confess/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::Hub::Interceptor::Terminator();
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
1;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::Hub; our @ISA = qw(Test2::Hub) }
use Test2::Util::HashBase qw/nested exit_code manual_skip_all/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Test2::API::Instance;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/confess/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Test2::IPC::Driver; our @ISA = qw(Test2::IPC::Driver) }
use Test2::Hub::Interceptor();
use Test2::Hub::Interceptor::Terminator();
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
BEGIN { require Exporter; our @ISA = qw(Exporter) }
our @EXPORT = qw{
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use POSIX();
use Config qw/%Config/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/croak/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use Carp qw/croak confess/;
use Scalar::Util qw/blessed/;
use strict;
use warnings;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
#################################################################
# #
our @ISA = ('Test2::EventFacet::Trace');
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
1;
package ok;
-our $VERSION = '1.302181';
+our $VERSION = '1.302182';
use strict;
use Test::More ();
use strict;
use warnings;
+if ($] lt "5.008") {
+ print "1..0 # SKIP Test cannot run on perls below 5.8.0 because local doesn't work on hash keys.\n";
+ exit 0;
+}
+
use Test2::IPC;
use Test2::Tools::Tiny;
use Test2::API::Breakage;
ok(!$CLASS->report(1), "Still nothing to report");
{
- local %INC = (
- %INC,
- 'T2Test/UG1.pm' => 'T2Test/UG1.pm',
- 'T2Test/UG2.pm' => 'T2Test/UG2.pm',
- 'T2Test/UR1.pm' => 'T2Test/UR1.pm',
- 'T2Test/UR2.pm' => 'T2Test/UR2.pm',
- 'T2Test/KB1.pm' => 'T2Test/KB1.pm',
- 'T2Test/KB2.pm' => 'T2Test/KB2.pm',
- );
+ local $INC{"T2Test/UG1.pm"} = "T2Test/UG1.pm";
+ local $INC{"T2Test/UG2.pm"} = "T2Test/UG2.pm";
+ local $INC{"T2Test/UR1.pm"} = "T2Test/UR1.pm";
+ local $INC{"T2Test/UR2.pm"} = "T2Test/UR2.pm";
+ local $INC{"T2Test/KB1.pm"} = "T2Test/KB1.pm";
+ local $INC{"T2Test/KB2.pm"} = "T2Test/KB2.pm";
+
local $T2Test::UG1::VERSION = '0.9';
local $T2Test::UG2::VERSION = '0.9';
local $T2Test::UR1::VERSION = '0.9';