File Coverage

blib/lib/Locale/Maketext/Utils/MarkPhrase.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 10 10 100.0


line stmt bran cond sub pod time code
1             package Locale::Maketext::Utils::MarkPhrase;
2              
3             sub import {
4 1     1   12864 no strict 'refs';
  1         1  
  1         61  
5 1     1   6 *{ caller() . '::translatable' } = \&translatable;
  1         41  
6             }
7              
8             sub translatable {
9 2     2 1 1240 return $_[0];
10             }
11              
12             1;