1use Test2::Tools::Tiny;
2use strict;
3use warnings;
4
5use Test2::Event::Skip;
6use Test2::EventFacet::Trace;
7
8my $skip = Test2::Event::Skip->new(
9    trace  => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
10    name   => 'skip me',
11    reason => 'foo',
12);
13
14my $facet_data = $skip->facet_data;
15ok($facet_data->{about}, "Got basic data");
16is_deeply(
17    $facet_data->{amnesty},
18    [
19        {
20            tag       => 'skip',
21            details   => 'foo',
22            inherited => 0,
23        }
24    ],
25    "Added some amnesty for the skip",
26);
27
28is($skip->name, 'skip me', "set name");
29is($skip->reason, 'foo', "got skip reason");
30ok(!$skip->pass, "no default for pass");
31ok($skip->effective_pass, "TODO always effectively passes");
32
33is($skip->summary, "skip me (SKIP: foo)", "summary with reason");
34
35$skip->set_reason('');
36is($skip->summary, "skip me (SKIP)", "summary without reason");
37
38done_testing;
39