r48794 - in /branches/upstream/libtest-cpan-meta-perl/current: Changes META.yml lib/Test/CPAN/Meta.pm lib/Test/CPAN/Meta/Version.pm
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Wed Dec 16 00:06:46 UTC 2009
Author: jawnsy-guest
Date: Wed Dec 16 00:06:21 2009
New Revision: 48794
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=48794
Log:
[svn-upgrade] Integrating new upstream version, libtest-cpan-meta-perl (0.15)
Modified:
branches/upstream/libtest-cpan-meta-perl/current/Changes
branches/upstream/libtest-cpan-meta-perl/current/META.yml
branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta.pm
branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta/Version.pm
Modified: branches/upstream/libtest-cpan-meta-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-cpan-meta-perl/current/Changes?rev=48794&op=diff
==============================================================================
--- branches/upstream/libtest-cpan-meta-perl/current/Changes (original)
+++ branches/upstream/libtest-cpan-meta-perl/current/Changes Wed Dec 16 00:06:21 2009
@@ -1,10 +1,13 @@
# Changes log for Test::CPAN::Meta
+
+0.15 12/12/2009
+ - clarified spec defined and user defined keys, as promoted by Kevin
+ Ryde in RT#52685 (thanks Kevin).
0.14 07/12/2009
- RT#46473: license url with fragment part (Kevin Ryde)
- RT#47393: "optional_features" as map rather than list (Kevin Ryde)
- above applied to 1.4, 1.3 and 1.2 version of the meta-spec.
-
0.13 24/05/2009
- added version checking to standard 94metatest.t
Modified: branches/upstream/libtest-cpan-meta-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-cpan-meta-perl/current/META.yml?rev=48794&op=diff
==============================================================================
--- branches/upstream/libtest-cpan-meta-perl/current/META.yml (original)
+++ branches/upstream/libtest-cpan-meta-perl/current/META.yml Wed Dec 16 00:06:21 2009
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Test-CPAN-Meta
-version: 0.14
+version: 0.15
abstract: A test module to validate a CPAN META.yml file.
author:
- Barbie <barbie at cpan.org>
@@ -24,10 +24,10 @@
provides:
Test::CPAN::Meta:
file: lib/Test/CPAN/Meta.pm
- version: 0.14
+ version: 0.15
Test::CPAN::Meta::Version:
file: lib/Test/CPAN/Meta/Version.pm
- version: 0.14
+ version: 0.15
no_index:
directory:
- t
Modified: branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta.pm?rev=48794&op=diff
==============================================================================
--- branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta.pm (original)
+++ branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta.pm Wed Dec 16 00:06:21 2009
@@ -4,7 +4,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '0.14';
+$VERSION = '0.15';
#----------------------------------------------------------------------------
Modified: branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta/Version.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta/Version.pm?rev=48794&op=diff
==============================================================================
--- branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta/Version.pm (original)
+++ branches/upstream/libtest-cpan-meta-perl/current/lib/Test/CPAN/Meta/Version.pm Wed Dec 16 00:06:21 2009
@@ -4,7 +4,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '0.14';
+$VERSION = '0.15';
#----------------------------------------------------------------------------
@@ -539,7 +539,12 @@
=item * word($self,$key,$value)
Validates that key is in an acceptable format for the META.yml specification,
-i.e. any in the character class [-_a-z].
+i.e. any in the character class [-_a-z].
+
+For user defined keys, although not explicitly stated in the specifications
+(v1.0 - v1.4), the convention is to precede the key with a pattern matching
+qr{\Ax_}i. Following this any character from the character class [-_a-zA-Z]
+can be used. This clarification has been added to v2.0 of the specification.
=item * module($self,$key,$value)
@@ -710,7 +715,8 @@
sub word {
my ($self,$key) = @_;
if(defined $key) {
- return 1 if($key && $key =~ /^([-_a-z]+)$/);
+ return 1 if($key && $key =~ /^([-_a-z]+)$/); # spec defined
+ return 1 if($key && $key =~ /^x_([-_a-z]+)$/i); # user defined
} else {
$key = '<undef>';
}
More information about the Pkg-perl-cvs-commits
mailing list