File Coverage

blib/lib/Plack/Middleware/Debug/Panel.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 2 0.0
total 17 19 89.4


line stmt bran cond sub pod time code
1             package Plack::Middleware::Debug::Panel;
2 2     2   13 use strict;
  2         4  
  2         56  
3 2     2   9 use warnings;
  2         4  
  2         85  
4 2     2   19 use Plack::Util::Accessor qw(dom_id url title nav_title nav_subtitle content disabled);
  2         4  
  2         11  
5              
6 20     20 0 130 sub new { bless {}, shift }
7 6     6 0 47 sub disable { $_[0]->disabled(1); return }
  6         87  
8              
9             1;