File Coverage

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

Criterion	Covered	Total	%
statement	16	16	100.0
branch	2	2	100.0
condition	1	2	50.0
subroutine	4	4	100.0
pod			n/a
total	23	24	95.8

package Moonshine::Bootstrap::Component::Alert;

use Moonshine::Magic;
use Params::Validate qw/HASHREF/;
use Moonshine::Util;

lazy_components qw/a/;
extends 'Moonshine::Bootstrap::Component';

has(
    alert_spec => sub {
        {
            tag         => { default => 'div' },
            class_base  => { default => 'alert' },
            switch      => { default => 'success' },
            switch_base => { default => 'alert-' },
            link        => { type => HASHREF, optional => 1 },
        };
    }
);

sub alert {
    my ($self) = shift;

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

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

    if ( my $link = $build_args->{link} ) {
        $link->{class} = append_str('alert-link', $link->{class});
        $base_element->add_child( $self->a($link) );
    }

    return $base_element;
}

1;

__END__