1package Test::Builder::TodoDiag;
2use strict;
3use warnings;
4
5our $VERSION = '1.302162';
6
7BEGIN { require Test2::Event::Diag; our @ISA = qw(Test2::Event::Diag) }
8
9sub diagnostics { 0 }
10
11sub facet_data {
12    my $self = shift;
13    my $out = $self->SUPER::facet_data();
14    $out->{info}->[0]->{debug} = 0;
15    return $out;
16}
17
181;
19
20__END__
21
22=pod
23
24=encoding UTF-8
25
26=head1 NAME
27
28Test::Builder::TodoDiag - Test::Builder subclass of Test2::Event::Diag
29
30=head1 DESCRIPTION
31
32This is used to encapsulate diag messages created inside TODO.
33
34=head1 SYNOPSIS
35
36You do not need to use this directly.
37
38=head1 SOURCE
39
40The source code repository for Test2 can be found at
41F<http://github.com/Test-More/test-more/>.
42
43=head1 MAINTAINERS
44
45=over 4
46
47=item Chad Granum E<lt>exodist@cpan.orgE<gt>
48
49=back
50
51=head1 AUTHORS
52
53=over 4
54
55=item Chad Granum E<lt>exodist@cpan.orgE<gt>
56
57=back
58
59=head1 COPYRIGHT
60
61Copyright 2019 Chad Granum E<lt>exodist@cpan.orgE<gt>.
62
63This program is free software; you can redistribute it and/or
64modify it under the same terms as Perl itself.
65
66See F<http://dev.perl.org/licenses/>
67
68=cut
69