File Coverage

blib/lib/App/Spec/Option.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch			n/a
condition	2	2	100.0
subroutine	5	5	100.0
pod	1	1	100.0
total	24	24	100.0

# ABSTRACT: App::Spec objects representing command line option specs
use strict;
use warnings;
package App::Spec::Option;

our $VERSION = '0.013'; # VERSION

use base 'App::Spec::Argument';
use Moo;

has aliases => ( is => 'ro' );

sub build {
    my ($class, %args) = @_;
    my %hash = $class->common(%args);
    my $self = $class->new({
        aliases => $args{aliases} || [],
        %hash,
    });
    return $self;
}

1;

=pod

=head1 NAME

App::Spec::Option - App::Spec objects representing command line option specs

=head1 SYNOPSIS

This class inherits from L

=head1 METHODS

=over 4

=item build

    my $option = App::Spec::Option->build(
        name => 'verbose',
        summary => 'lala',
        aliases => ['v'],
    );

=item aliases

Attribute which represents the one from the spec.

=back

=cut