File Coverage

blib/lib/Translate/Fluent/Elements/Attribute.pm

Criterion	Covered	Total	%
statement	5	5	100.0
branch			n/a
condition			n/a
subroutine	2	2	100.0
pod	1	1	100.0
total	8	8	100.0

package Translate::Fluent::Elements::Attribute;

use Moo;
extends 'Translate::Fluent::Elements::Base';

has [qw(identifier pattern)] => (
  is  => 'ro',
  default => sub { undef },
);

around BUILDARGS => sub {
  my ($orig, $class, %args) = @_;

  $args{ identifier } = delete $args{ Identifier };
  $args{ pattern }    = delete $args{ Pattern };

  $class->$orig( %args );
};

sub translate {
  my ($self, $variables) = @_;

  return $self->pattern->translate( $variables );
}


1;

__END__