File Coverage

blib/lib/Moops/TraitFor/Keyword/rwp.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1 2     2   1461 use v5.14;
  2         8  
2 2     2   12 use strict;
  2         3  
  2         69  
3 2     2   10 use warnings FATAL => 'all';
  2         4  
  2         113  
4 2     2   10 no warnings qw(void once uninitialized numeric);
  2         4  
  2         211  
5              
6             package Moops::TraitFor::Keyword::rwp;
7              
8             our $AUTHORITY = 'cpan:TOBYINK';
9             our $VERSION = '0.038';
10              
11 2     2   16 use Moo::Role;
  2         3  
  2         22  
12              
13             around arguments_for_moosex_mungehas => sub {
14             my $next = shift;
15             my $self = shift;
16             return ('is_rwp', $self->$next(@_));
17             };
18              
19             1;