summaryrefslogtreecommitdiff
path: root/cpan/Test-Simple/t/Test2/modules/Event/Diag.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Test-Simple/t/Test2/modules/Event/Diag.t')
-rw-r--r--cpan/Test-Simple/t/Test2/modules/Event/Diag.t27
1 files changed, 23 insertions, 4 deletions
diff --git a/cpan/Test-Simple/t/Test2/modules/Event/Diag.t b/cpan/Test-Simple/t/Test2/modules/Event/Diag.t
index 9094c0af18..885ee085c0 100644
--- a/cpan/Test-Simple/t/Test2/modules/Event/Diag.t
+++ b/cpan/Test-Simple/t/Test2/modules/Event/Diag.t
@@ -2,17 +2,17 @@ use strict;
use warnings;
use Test2::Tools::Tiny;
use Test2::Event::Diag;
-use Test2::Util::Trace;
+use Test2::EventFacet::Trace;
my $diag = Test2::Event::Diag->new(
- trace => Test2::Util::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
+ trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
message => 'foo',
);
is($diag->summary, 'foo', "summary is just message");
$diag = Test2::Event::Diag->new(
- trace => Test2::Util::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
+ trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
message => undef,
);
@@ -20,7 +20,7 @@ is($diag->message, 'undef', "set undef message to undef");
is($diag->summary, 'undef', "summary is just message even when undef");
$diag = Test2::Event::Diag->new(
- trace => Test2::Util::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
+ trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
message => {},
);
@@ -28,4 +28,23 @@ like($diag->message, qr/^HASH\(.*\)$/, "stringified the input value");
ok($diag->diagnostics, "Diag events are counted as diagnostics");
+$diag = Test2::Event::Diag->new(
+ trace => Test2::EventFacet::Trace->new(frame => [__PACKAGE__, __FILE__, __LINE__]),
+ message => "Hi there",
+);
+
+my $facet_data = $diag->facet_data;
+ok($facet_data->{about}, "Got 'about' from common");
+ok($facet_data->{trace}, "Got 'trace' from common");
+
+is_deeply(
+ $facet_data->{info},
+ [{
+ tag => 'DIAG',
+ debug => 1,
+ details => 'Hi there',
+ }],
+ "Got info facet"
+);
+
done_testing;