[SCM] libmessage-passing-perl Debian packaging branch, master, updated. debian/0.111-3-14-g44f6e88
Tomas Doran
bobtfish at bobtfish.net
Mon May 6 11:57:35 UTC 2013
The following commit has been merged in the master branch:
commit 34e41738e46a1c788d646efc6b44108c4e796bd8
Author: Tomas Doran <bobtfish at bobtfish.net>
Date: Sat Aug 18 16:29:20 2012 +0100
Fix options methods
diff --git a/lib/Message/Passing/Role/CLIComponent.pm b/lib/Message/Passing/Role/CLIComponent.pm
index 1b8ad28..c249b56 100644
--- a/lib/Message/Passing/Role/CLIComponent.pm
+++ b/lib/Message/Passing/Role/CLIComponent.pm
@@ -19,9 +19,16 @@ sub make_variant {
my $default = $has_default ? $arguments{default} : undef;
option "$name" => (
+ isa => Str,
is => 'ro',
# required => "$has_default" ? 0 : 1,
- $has_default ? ( default => sub { "$default" } ) : (),
+ "$has_default" ? ( default => sub { "$default" } ) : (),
+ format => 's',
+ );
+
+ option "${name}_options" => (
+ is => 'ro',
+ default => sub { {} },
isa => sub { ref($_[0]) eq 'HASH' },
coerce => sub {
my $str = shift;
--
libmessage-passing-perl Debian packaging
More information about the Pkg-perl-cvs-commits
mailing list