blib/lib/Translate/Fluent/Elements/FunctionReference.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 3 | 3 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 1 | 1 | 100.0 |
pod | n/a | ||
total | 4 | 4 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Translate::Fluent::Elements::FunctionReference; | ||||||
2 | |||||||
3 | 6 | 6 | 41 | use Moo; | |||
6 | 12 | ||||||
6 | 32 | ||||||
4 | extends 'Translate::Fluent::Elements::Base'; | ||||||
5 | |||||||
6 | has [qw( | ||||||
7 | identifier | ||||||
8 | call_arguments | ||||||
9 | )] => ( | ||||||
10 | is => 'ro', | ||||||
11 | default => sub { undef }, | ||||||
12 | ); | ||||||
13 | |||||||
14 | around BUILDARGS => sub { | ||||||
15 | my ($orig, $class, %args) = @_; | ||||||
16 | |||||||
17 | $args{call_arguments} = delete $args{ CallArguments }; | ||||||
18 | |||||||
19 | $class->$orig( %args ); | ||||||
20 | }; | ||||||
21 | |||||||
22 | 1; | ||||||
23 | __END__ |