File Coverage

blib/lib/Moonshine/Bootstrap/Component/NavbarToggle.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::NavbarToggle;

use Moonshine::Magic;

extends 'Moonshine::Bootstrap::Component';

lazy_components('span');

has(
    navbar_toggle_spec => sub {
        {
            tag           => { default => 'button' },
            type          => { default => 'button' },
            class_base    => { default => 'navbar-toggle collapsed' },
            data_toggle   => { default => 'collapse' },
            aria_expanded => { default => 'false' },
            i             => { default => 'icon-bar' },
            sr_text       => { default => 'Toggle navigation' },
            data_target   => 1,
        };
    }
);

sub navbar_toggle {
    my ($self) = shift;

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

    $base_args->{data_target} = sprintf "#%s", $base_args->{data_target};

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

    $toggle->add_child(
        $self->span( { class => 'sr-only', data => $build_args->{sr_text} } ) );

    for ( 1 .. 3 ) {
        $toggle->add_child( $self->span( { class => $build_args->{i} } ) );
    }

    return $toggle;
}

1;

__END__