File Coverage

blib/lib/MooseX/App/Plugin/Version.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod	0	1	0.0
total	18	19	94.7

# ============================================================================
package MooseX::App::Plugin::Version;
# ============================================================================

use 5.010;
use utf8;

use namespace::autoclean;
use Moose::Role;

sub plugin_metaroles {
    my ($self,$class) = @_;

    return {
        class   => ['MooseX::App::Plugin::Version::Meta::Class'],
    }
}

around 'initialize_command_class' => sub {
    my $orig = shift;
    my $self = shift;

    my $return = $self->$orig(@_);
    if (blessed $return
        && $return->isa('MooseX::App::Plugin::Version::Command')) {
        return $return->version($self);
    }

    return $return;
};

1;

__END__

=encoding utf8

=head1 NAME

MooseX::App::Plugin::Version - Adds a command to display the version and license of your application

=head1 SYNOPSIS

In your base class:

 package MyApp;
 use MooseX::App qw(Version);

In your shell

 bash$ myapp version
 VERSION
     MyApp version 2.1
     MooseX::App version 1.08
     Perl version 5.16.2

 LICENSE
     This library is free software and may be distributed under the same terms
     as perl itself.

=head1 DESCRIPTION

This plugin adds a command to display the version of your application,
MooseX::App and perl.

Furthermore it tries to parse the Pod of the base class and extract
LICENSE, AUTHOR and COPYRIGHT sections

=cut