File Coverage

lib/CPAN/Changes/Markdown/Filter.pm

Criterion	Covered	Total	%
statement	25	26	96.1
branch			n/a
condition			n/a
subroutine	7	8	87.5
pod	1	1	100.0
total	33	35	94.2

use 5.008;    # utf8
use strict;
use warnings;
use utf8;

package CPAN::Changes::Markdown::Filter;
$CPAN::Changes::Markdown::Filter::VERSION = '1.000000';
# ABSTRACT: a simple plug-in based, staged text filter for Markdown translation

our $AUTHORITY = 'cpan:KENTNL'; # AUTHORITY











use Moo 1.000008 qw( with has );
use CPAN::Changes::Markdown::Filter::NodeUtil qw(mk_node_plaintext);














with 'CPAN::Changes::Markdown::Role::Filter';







has rules => (
  is      => ro =>,
  lazy    => 1,
  builder => sub {
    [];
  },
);







sub process {
  my ( $self, $input ) = @_;
  my (@input) = ( mk_node_plaintext($input) );
  for my $rule ( @{ $self->rules } ) {
    @input = $rule->filter(@input);
  }
  return join q{}, map { $_->to_s } @input;
}

1;

__END__