File Coverage

blib/lib/WWW/Shopify/Liquid/Dialect.pm

Criterion	Covered	Total	%
statement	20	20	100.0
branch			n/a
condition	2	3	66.6
subroutine	6	6	100.0
pod	0	3	0.0
total	28	32	87.5

package WWW::Shopify::Liquid::Dialect;

use strict;
use warnings;
use Module::Find;

sub new { return bless { }, $_[0]; }

sub use_modules {
	my ($self, $package) = @_;
	return useall($package || ref($self) || $self);
}

sub apply {
	my ($self, $liquid, $package) = @_;

	my @modules = $self->use_modules($package);

	$liquid->register_operator($_) for (grep { $_ =~ m/\bOperator\b/ } @modules);
	$liquid->register_filter($_) for (grep { $_ =~ m/\bFilter\b/ } @modules);
	$liquid->register_tag($_) for (grep { $_ =~ m/\bTag\b/ } @modules);
}

1;