summaryrefslogtreecommitdiff
path: root/cpan/Test-Simple/t/Test2/modules/Event/Exception.t
diff options
context:
space:
mode:
Diffstat (limited to 'cpan/Test-Simple/t/Test2/modules/Event/Exception.t')
-rw-r--r--cpan/Test-Simple/t/Test2/modules/Event/Exception.t15
1 files changed, 14 insertions, 1 deletions
diff --git a/cpan/Test-Simple/t/Test2/modules/Event/Exception.t b/cpan/Test-Simple/t/Test2/modules/Event/Exception.t
index b2bcb6f2db..78c175878a 100644
--- a/cpan/Test-Simple/t/Test2/modules/Event/Exception.t
+++ b/cpan/Test-Simple/t/Test2/modules/Event/Exception.t
@@ -4,7 +4,7 @@ use Test2::Tools::Tiny;
use Test2::Event::Exception;
my $exception = Test2::Event::Exception->new(
- trace => 'fake',
+ trace => {frame => []},
error => "evil at lake_of_fire.t line 6\n",
);
@@ -14,4 +14,17 @@ is($exception->summary, "Exception: evil at lake_of_fire.t line 6", "Got summary
ok($exception->diagnostics, "Exception events are counted as diagnostics");
+my $facet_data = $exception->facet_data;
+ok($facet_data->{about}, "Got common facet data");
+
+is_deeply(
+ $facet_data->{errors},
+ [{
+ tag => 'ERROR',
+ fail => 1,
+ details => "evil at lake_of_fire.t line 6\n",
+ }],
+ "Got error facet",
+);
+
done_testing;