File Coverage

blib/lib/Template/Plugin/Ligature.pm
Criterion Covered Total %
statement 23 23 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 1 2 50.0
total 32 33 96.9


line stmt bran cond sub pod time code
1             package Template::Plugin::Ligature;
2              
3 3     3   228271 use 5.006;
  3         11  
  3         109  
4 3     3   19 use strict;
  3         4  
  3         113  
5 3     3   14 use warnings;
  3         27  
  3         105  
6 3     3   2278 use parent qw( Template::Plugin::Filter );
  3         876  
  3         19  
7 3     3   18612 use Text::Ligature qw( to_ligatures );
  3         2794  
  3         210  
8              
9             our $VERSION = '0.04';
10              
11 3     3   17 use constant FILTER_NAME => 'ligature';
  3         6  
  3         678  
12              
13             sub init {
14 2     2 0 118 my ($self) = @_;
15              
16 2         67 $self->install_filter(FILTER_NAME);
17              
18 2         104 return $self;
19             }
20              
21             sub filter {
22 2     2 1 5153 my ($self, $text) = @_;
23              
24 2         11 return to_ligatures($text);
25             }
26              
27             1;
28              
29             __END__