File Coverage

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

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition	1	2	50.0
subroutine	5	5	100.0
pod			n/a
total	21	22	95.4

package Moonshine::Bootstrap::Component::Glyphicon;

use strict;
use warnings;

use Moonshine::Magic;
use Moonshine::Bootstrap::Component;

extends 'Moonshine::Bootstrap::Component';

lazy_components(qw/span/);

has(
    glyphicon_spec => sub {
        {
            switch      => 1,
            switch_base => { default => 'glyphicon glyphicon-' },
            aria_hidden => { default => 'true' },
        };
    }
);

sub glyphicon {
    my ($self) = shift;

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

1;

__END__