r13826 - in /branches/upstream/libmoosex-getopt-perl/current: ChangeLog META.yml lib/MooseX/Getopt.pm
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Tue Jan 29 16:19:11 UTC 2008
Author: gregoa-guest
Date: Tue Jan 29 16:19:11 2008
New Revision: 13826
URL: http://svn.debian.org/wsvn/?sc=1&rev=13826
Log:
[svn-upgrade] Integrating new upstream version, libmoosex-getopt-perl (0.11)
Modified:
branches/upstream/libmoosex-getopt-perl/current/ChangeLog
branches/upstream/libmoosex-getopt-perl/current/META.yml
branches/upstream/libmoosex-getopt-perl/current/lib/MooseX/Getopt.pm
Modified: branches/upstream/libmoosex-getopt-perl/current/ChangeLog
URL: http://svn.debian.org/wsvn/branches/upstream/libmoosex-getopt-perl/current/ChangeLog?rev=13826&op=diff
==============================================================================
--- branches/upstream/libmoosex-getopt-perl/current/ChangeLog (original)
+++ branches/upstream/libmoosex-getopt-perl/current/ChangeLog Tue Jan 29 16:19:11 2008
@@ -1,4 +1,10 @@
Revision history for Perl extension MooseX-Getopt
+
+0.11 Sun. Jan. 27, 2008
+ * MooseX::Getopt
+ - Commandline option shouldn't be required in the
+ case that the given "required" attribute has
+ a default or a builder method.
0.10 Wed. Jan. 23, 2008
* MooseX::Getopt
Modified: branches/upstream/libmoosex-getopt-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libmoosex-getopt-perl/current/META.yml?rev=13826&op=diff
==============================================================================
--- branches/upstream/libmoosex-getopt-perl/current/META.yml (original)
+++ branches/upstream/libmoosex-getopt-perl/current/META.yml Tue Jan 29 16:19:11 2008
@@ -1,6 +1,6 @@
---
name: MooseX-Getopt
-version: 0.10
+version: 0.11
author:
- 'Stevan Little E<lt>stevan at iinteractive.comE<gt>'
- 'Brandon L. Black, E<lt>blblack at gmail.comE<gt>'
@@ -17,7 +17,7 @@
provides:
MooseX::Getopt:
file: lib/MooseX/Getopt.pm
- version: 0.10
+ version: 0.11
MooseX::Getopt::Meta::Attribute:
file: lib/MooseX/Getopt/Meta/Attribute.pm
version: 0.04
Modified: branches/upstream/libmoosex-getopt-perl/current/lib/MooseX/Getopt.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libmoosex-getopt-perl/current/lib/MooseX/Getopt.pm?rev=13826&op=diff
==============================================================================
--- branches/upstream/libmoosex-getopt-perl/current/lib/MooseX/Getopt.pm (original)
+++ branches/upstream/libmoosex-getopt-perl/current/lib/MooseX/Getopt.pm Tue Jan 29 16:19:11 2008
@@ -9,7 +9,7 @@
use Getopt::Long (); # GLD uses it anyway, doesn't hurt
use constant HAVE_GLD => not not eval { require Getopt::Long::Descriptive };
-our $VERSION = '0.10';
+our $VERSION = '0.11';
our $AUTHORITY = 'cpan:STEVAN';
has ARGV => (is => 'rw', isa => 'ArrayRef', metaclass => "NoGetopt");
@@ -175,7 +175,7 @@
name => $name,
init_arg => $attr->init_arg,
opt_string => $opt_string,
- required => $attr->is_required,
+ required => $attr->is_required && !$attr->has_default && !$attr->has_builder,
( ( $attr->has_default && ( $attr->is_default_a_coderef xor $attr->is_lazy ) ) ? ( default => $attr->default({}) ) : () ),
( $attr->has_documentation ? ( doc => $attr->documentation ) : () ),
}
More information about the Pkg-perl-cvs-commits
mailing list