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