1use strict; 2use warnings; 3 4use Test2::Tools::Tiny; 5use Test2::Event::Waiting; 6 7my $waiting = Test2::Event::Waiting->new( 8 trace => {}, 9); 10 11ok($waiting, "Created event"); 12ok($waiting->global, "waiting is global"); 13 14is($waiting->summary, "IPC is waiting for children to finish...", "Got summary"); 15 16my $facet_data = $waiting->facet_data; 17ok($facet_data->{about}, "Got common facet data"); 18 19is_deeply( 20 $facet_data->{info}, 21 [ 22 { 23 tag => 'INFO', 24 debug => 0, 25 details => "IPC is waiting for children to finish...", 26 }, 27 ], 28 "Got added info facet" 29); 30 31done_testing; 32