1#@!#!123s

: / proc / thread-self / root / usr / share / doc / perl-Test-Simple / t / Test2 / modules / Event /

Filename : Note.t

back

use strict;
use warnings;

use Test2::Tools::Tiny;
use Test2::Event::Note;
use Test2::EventFacet::Trace;

my $note = Test2::Event::Note->new(
    trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
    message => 'foo',
);

is($note->summary, 'foo', "summary is just message");

$note = Test2::Event::Note->new(
    trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
    message => undef,
);

is($note->message, 'undef', "set undef message to undef");
is($note->summary, 'undef', "summary is just message even when undef");

$note = Test2::Event::Note->new(
    trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
    message => {},
);

like($note->message, qr/^HASH\(.*\)$/, "stringified the input value");

$note = Test2::Event::Note->new(
    trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
    message => 'Hi there',
);

my $facet_data = $note->facet_data;
ok($facet_data->{about}, "Got 'about' from common");
ok($facet_data->{trace}, "Got 'trace' from common");

is_deeply(
    $facet_data->{info},
    [{
        tag => 'NOTE',
        debug => 0,
        details => 'Hi there',
    }],
    "Got info facet"
);


done_testing;

Name	Size	Last Modified	Owner	Permissions
TAP	Dir	July 28 2023 2:57:48	root	0755
Bail.t	1.679 KB	March 30 2018 5:53:02	root	0644
Diag.t	1.3 KB	March 30 2018 5:53:02	root	0644
Encoding.t	0.644 KB	March 30 2018 5:53:02	root	0644
Exception.t	1.205 KB	March 30 2018 5:53:02	root	0644
Fail.t	1.156 KB	March 30 2018 5:53:02	root	0644
Generic.t	3.722 KB	March 30 2018 5:53:02	root	0644
Note.t	1.236 KB	March 30 2018 5:53:02	root	0644
Ok.t	4.341 KB	March 30 2018 5:53:02	root	0644
Pass.t	1.181 KB	March 30 2018 5:53:02	root	0644
Plan.t	4.334 KB	March 30 2018 5:53:02	root	0644
Skip.t	0.904 KB	March 30 2018 5:53:02	root	0644
Subtest.t	1.447 KB	March 30 2018 5:53:02	root	0644
V2.t	2.502 KB	March 30 2018 5:53:02	root	0644
Waiting.t	0.615 KB	March 30 2018 5:53:02	root	0644

2017 © D7net \| D704T team