File Coverage

blib/lib/Text/HikiDoc/Plugin/e.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch	2	2	100.0
condition	2	2	100.0
subroutine	4	4	100.0
pod	1	1	100.0
total	24	24	100.0

package Text::HikiDoc::Plugin::e;

use strict;
use warnings;
use base 'Text::HikiDoc::Plugin';

sub to_html {
    my $self = shift;
    my $str = shift || '';

    if ( $str =~ /^(\d+)$/ ) {
        $str = '&#'.$str.';';
    }
    else {
        $str = '&'.$str.';';
    }

    return $str;
}

1;