r46298 - in /trunk/libmoosex-getopt-perl: ChangeLog MANIFEST META.yml debian/changelog inc/Module/Install/AuthorRequires.pm inc/Module/Install/AutoManifest.pm lib/MooseX/Getopt.pm t/103_uc_bug.t
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Oct 24 04:01:35 UTC 2009
Author: jawnsy-guest
Date: Sat Oct 24 04:01:27 2009
New Revision: 46298
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=46298
Log:
New upstream release
Added:
trunk/libmoosex-getopt-perl/t/103_uc_bug.t
- copied unchanged from r46297, branches/upstream/libmoosex-getopt-perl/current/t/103_uc_bug.t
Removed:
trunk/libmoosex-getopt-perl/inc/Module/Install/AutoManifest.pm
Modified:
trunk/libmoosex-getopt-perl/ChangeLog
trunk/libmoosex-getopt-perl/MANIFEST
trunk/libmoosex-getopt-perl/META.yml
trunk/libmoosex-getopt-perl/debian/changelog
trunk/libmoosex-getopt-perl/inc/Module/Install/AuthorRequires.pm
trunk/libmoosex-getopt-perl/lib/MooseX/Getopt.pm
Modified: trunk/libmoosex-getopt-perl/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/ChangeLog?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/ChangeLog (original)
+++ trunk/libmoosex-getopt-perl/ChangeLog Sat Oct 24 04:01:27 2009
@@ -1,8 +1,12 @@
Revision history for Perl extension MooseX-Getopt
+
+0.24 Fri. Oct 23 2009
+ * MooseX::Getopt
+ - Fix bug with mixed case attribute names (MAROS)
0.23 Fri. Oct 02 2009
* MooseX::Getopt
- - Allow the config file to be a code ref which is called to return
+ - Allow the config file to return a code ref which is called to return
the config file location (Gordon Irving)
0.22 Sat. Sept 05 2009
Modified: trunk/libmoosex-getopt-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/MANIFEST?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/MANIFEST (original)
+++ trunk/libmoosex-getopt-perl/MANIFEST Sat Oct 24 04:01:27 2009
@@ -2,7 +2,6 @@
inc/Module/Install.pm
inc/Module/Install/AuthorRequires.pm
inc/Module/Install/AuthorTests.pm
-inc/Module/Install/AutoManifest.pm
inc/Module/Install/Base.pm
inc/Module/Install/Can.pm
inc/Module/Install/Fetch.pm
@@ -38,5 +37,6 @@
t/100_gld_default_bug.t
t/101_argv_bug.t
t/102_basic_basic.t
+t/103_uc_bug.t
t/author/pod.t
t/author/pod_coverage.t
Modified: trunk/libmoosex-getopt-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/META.yml?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/META.yml (original)
+++ trunk/libmoosex-getopt-perl/META.yml Sat Oct 24 04:01:27 2009
@@ -10,7 +10,7 @@
configure_requires:
ExtUtils::MakeMaker: 6.42
distribution_type: module
-generated_by: 'Module::Install version 0.910'
+generated_by: 'Module::Install version 0.91'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -27,4 +27,4 @@
resources:
license: http://dev.perl.org/licenses/
repository: git://git.moose.perl.org/MooseX-Getopt.git
-version: 0.23
+version: 0.24
Modified: trunk/libmoosex-getopt-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/debian/changelog?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/debian/changelog (original)
+++ trunk/libmoosex-getopt-perl/debian/changelog Sat Oct 24 04:01:27 2009
@@ -1,3 +1,9 @@
+libmoosex-getopt-perl (0.24-1) UNRELEASED; urgency=low
+
+ * New upstream release
+
+ -- Jonathan Yu <jawnsy at cpan.org> Fri, 23 Oct 2009 20:32:12 -0400
+
libmoosex-getopt-perl (0.23-1) unstable; urgency=low
[ Jonathan Yu ]
Modified: trunk/libmoosex-getopt-perl/inc/Module/Install/AuthorRequires.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/inc/Module/Install/AuthorRequires.pm?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/inc/Module/Install/AuthorRequires.pm (original)
+++ trunk/libmoosex-getopt-perl/inc/Module/Install/AuthorRequires.pm Sat Oct 24 04:01:27 2009
@@ -4,13 +4,14 @@
package Module::Install::AuthorRequires;
-use base 'Module::Install::Base';
-
# cargo cult
BEGIN {
- our $VERSION = '0.02';
+ our $VERSION = '0.01';
our $ISCORE = 1;
+# our @ISA = qw{Module::Install::Base};
}
+
+use base qw/Module::Install::Base/;
sub author_requires {
my $self = shift;
@@ -35,4 +36,4 @@
__END__
-#line 92
+#line 93
Modified: trunk/libmoosex-getopt-perl/lib/MooseX/Getopt.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-getopt-perl/lib/MooseX/Getopt.pm?rev=46298&op=diff
==============================================================================
--- trunk/libmoosex-getopt-perl/lib/MooseX/Getopt.pm (original)
+++ trunk/libmoosex-getopt-perl/lib/MooseX/Getopt.pm Sat Oct 24 04:01:27 2009
@@ -11,7 +11,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.23';
+our $VERSION = '0.24';
our $AUTHORITY = 'cpan:STEVAN';
has ARGV => (is => 'rw', isa => 'ArrayRef', metaclass => "NoGetopt");
@@ -51,7 +51,7 @@
}
my $constructor_params = ( @params == 1 ? $params[0] : {@params} );
-
+
Carp::croak("Single parameters to new_with_options() must be a HASH ref")
unless ref($constructor_params) eq 'HASH';
@@ -133,7 +133,7 @@
foreach my $opt ( @{ $params{options} } ) {
push @options, $opt->{opt_string};
- my $identifier = $opt->{name};
+ my $identifier = lc($opt->{name});
$identifier =~ s/\W/_/g; # Getopt::Long does this to all option names
$name_to_init_arg{$identifier} = $opt->{init_arg};
@@ -165,7 +165,7 @@
},
];
- my $identifier = $opt->{name};
+ my $identifier = lc($opt->{name});
$identifier =~ s/\W/_/g; # Getopt::Long does this to all option names
$name_to_init_arg{$identifier} = $opt->{init_arg};
@@ -435,7 +435,7 @@
params from the command line (possibly overriding those in C<%params>)
and then return a newly constructed object.
-The special parameter C<argv>, if specified should point to an array
+The special parameter C<argv>, if specified should point to an array
reference with an array to use instead of C<@ARGV>.
If L<Getopt::Long/GetOptions> fails (due to invalid arguments),
More information about the Pkg-perl-cvs-commits
mailing list