diff options
-rw-r--r-- | lib/Getopt/Dakkar.pm | 2 | ||||
-rw-r--r-- | lib/Getopt/Dakkar/Role/Piece.pm | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/lib/Getopt/Dakkar.pm b/lib/Getopt/Dakkar.pm index b43c24e..f35147b 100644 --- a/lib/Getopt/Dakkar.pm +++ b/lib/Getopt/Dakkar.pm @@ -6,4 +6,4 @@ use Module::Runtime qw(use_module); with 'Getopt::Dakkar::Role::Command'; -1; +has '+name' => ( default => $0 ); diff --git a/lib/Getopt/Dakkar/Role/Piece.pm b/lib/Getopt/Dakkar/Role/Piece.pm index d981095..144f9e7 100644 --- a/lib/Getopt/Dakkar/Role/Piece.pm +++ b/lib/Getopt/Dakkar/Role/Piece.pm @@ -3,6 +3,7 @@ use Getopt::Dakkar::Style qw(role); # VERSION # ABSTRACT: a piece +has name => ( is => 'ro', isa => Str, required => 1 ); has class => ( is => 'ro', isa => ClassName, default => 'Getopt::Dakkar::Stash' ); has object => ( is => 'ro', isa => Object ); has op => ( is => 'ro', isa => Str|CodeRef ); |