File Coverage

blib/lib/Moonshine/Bootstrap/Component/LinkedLiSpan.pm

Criterion	Covered	Total	%
statement	11	11	100.0
branch			n/a
condition	1	2	50.0
subroutine	2	2	100.0
pod			n/a
total	14	15	93.3

package Moonshine::Bootstrap::Component::LinkedLiSpan;

use Moonshine::Magic;

extends 'Moonshine::Bootstrap::Component';

has(
    linked_li_span_spec => sub {
        {
            tag  => { default  => 'li' },
            link => { default  => HASHREF },
            span => { default  => HASHREF, build => 1 },
            data => { optional => 1, build => 1 },
        };
    }
);

sub linked_li_span {
    my ($self) = shift;

    my ( $base_args, $build_args ) = $self->validate_build(
        {
            params => $_[0] // {},
            spec => $self->linked_li_span_spec,
        }
    );

    my $base_element = Moonshine::Element->new($base_args);

    my $a = $base_element->add_child(
        {
            tag => 'a',
            ( %{ $build_args->{link} } ),
        }
    );

    $a->add_child(
        {
            tag => 'span',
            ( %{ $build_args->{span} } ),
        }
    );

    return $base_element;
}

1;

__END__