File Coverage

blib/lib/Devel/Confess/Patch/UseDataDumpHTMLCollapsible.pm
Criterion Covered Total %
statement 17 23 73.9
branch n/a
condition n/a
subroutine 6 8 75.0
pod 0 1 0.0
total 23 32 71.8


line stmt bran cond sub pod time code
1             package Devel::Confess::Patch::UseDataDumpHTMLCollapsible;
2              
3 1     1   391143 use 5.010001;
  1         5  
4 1     1   7 use strict;
  1         3  
  1         41  
5 1     1   7 no warnings;
  1         3  
  1         73  
6              
7 1     1   784 use Module::Patch;
  1         24168  
  1         7  
8 1     1   41 use base qw(Module::Patch);
  1         1  
  1         267  
9              
10             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
11             our $DATE = '2024-03-12'; # DATE
12             our $DIST = 'Devel-Confess-Patch-UseDataDumpHTMLCollapsible'; # DIST
13             our $VERSION = '0.001'; # VERSION
14              
15             our %config;
16              
17             sub patch_data {
18             return {
19             v => 3,
20             patches => [
21             {
22             action => 'replace',
23             #mod_version => qr/^/,
24             sub_name => '_ref_formatter',
25             code => sub {
26 0     0     require Data::Dump::HTML::Collapsible;
27 0           local $SIG{__WARN__} = sub {};
28 0           local $SIG{__DIE__} = sub {};
29 1     1   6 no warnings 'once';
  1         1  
  1         89  
30 0           local $Data::Dump::HTML::Collapsible::OPT_REMOVE_PRAGMAS = 1;
31 0           Data::Dump::HTML::Collapsible::dump($_[0]);
32             },
33             },
34 0     0 0   ],
35             };
36             }
37              
38             1;
39             # ABSTRACT: Use Data::Dump::HTML::Collapsible to stringify reference
40              
41             __END__