r51805 - in /trunk/libdata-section-perl: ./ debian/ lib/Data/ t/ t/lib/ t/lib/I/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Jan 30 03:28:16 UTC 2010
Author: jawnsy-guest
Date: Sat Jan 30 03:28:01 2010
New Revision: 51805
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=51805
Log:
* New upstream release
* Update copyright years
* Rewrite control description
* Standards-Version 3.8.4 (no changes)
* Depends on MRO::Compat and B-D-I Test::Simple 0.88
Modified:
trunk/libdata-section-perl/Changes
trunk/libdata-section-perl/LICENSE
trunk/libdata-section-perl/META.json
trunk/libdata-section-perl/META.yml
trunk/libdata-section-perl/Makefile.PL
trunk/libdata-section-perl/README
trunk/libdata-section-perl/debian/changelog
trunk/libdata-section-perl/debian/control
trunk/libdata-section-perl/debian/copyright
trunk/libdata-section-perl/dist.ini
trunk/libdata-section-perl/lib/Data/Section.pm
trunk/libdata-section-perl/t/basic.t
trunk/libdata-section-perl/t/lib/Child.pm
trunk/libdata-section-perl/t/lib/Godfather.pm
trunk/libdata-section-perl/t/lib/Grandchild.pm
trunk/libdata-section-perl/t/lib/I/Child.pm
trunk/libdata-section-perl/t/lib/I/Grandchild.pm
trunk/libdata-section-perl/t/lib/I/Parent.pm
trunk/libdata-section-perl/t/lib/NoData.pm
trunk/libdata-section-perl/t/lib/NoName.pm
trunk/libdata-section-perl/t/lib/Parent.pm
Modified: trunk/libdata-section-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/Changes?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/Changes (original)
+++ trunk/libdata-section-perl/Changes Sat Jan 30 03:28:01 2010
@@ -1,4 +1,9 @@
Revision history for Data-Section
+
+0.100270 2010-01-27 22:43:33 America/New_York
+ switch from Class::ISA to MRO::Compat
+ added *_section_names
+ eliminate some duplicated code
0.093410 2009-12-07 18:45:56 America/New_York
allow data before first marker if default_name given
Modified: trunk/libdata-section-perl/LICENSE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/LICENSE?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/LICENSE (original)
+++ trunk/libdata-section-perl/LICENSE Sat Jan 30 03:28:01 2010
@@ -1,4 +1,4 @@
-This software is copyright (c) 2009 by Ricardo SIGNES.
+This software is copyright (c) 2010 by Ricardo SIGNES.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
@@ -12,7 +12,7 @@
--- The GNU General Public License, Version 1, February 1989 ---
-This software is Copyright (c) 2009 by Ricardo SIGNES.
+This software is Copyright (c) 2010 by Ricardo SIGNES.
This is free software, licensed under:
@@ -270,7 +270,7 @@
--- The Artistic License 1.0 ---
-This software is Copyright (c) 2009 by Ricardo SIGNES.
+This software is Copyright (c) 2010 by Ricardo SIGNES.
This is free software, licensed under:
Modified: trunk/libdata-section-perl/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/META.json?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/META.json (original)
+++ trunk/libdata-section-perl/META.json Sat Jan 30 03:28:01 2010
@@ -2,20 +2,22 @@
"resources" : {
"repository" : "http://github.com/rjbs/data-section"
},
+ "generated_by" : "Dist::Zilla version 1.100160",
"meta-spec" : {
"version" : 1.4,
"url" : "http://module-build.sourceforge.net/META-spec-v1.4.html"
},
- "generated_by" : "Dist::Zilla version 1.093400",
- "version" : "0.093410",
+ "version" : "0.100270",
"name" : "Data-Section",
"author" : [
"Ricardo SIGNES <rjbs at cpan.org>"
],
"license" : "perl",
"requires" : {
+ "Test::More" : "0.88",
+ "ExtUtils::MakeMaker" : "6.11",
"Sub::Exporter" : "0.979",
- "Class::ISA" : "0"
+ "MRO::Compat" : "0.09"
},
"abstract" : "read multiple hunks of data out of your DATA section"
}
Modified: trunk/libdata-section-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/META.yml?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/META.yml (original)
+++ trunk/libdata-section-perl/META.yml Sat Jan 30 03:28:01 2010
@@ -2,15 +2,17 @@
abstract: 'read multiple hunks of data out of your DATA section'
author:
- 'Ricardo SIGNES <rjbs at cpan.org>'
-generated_by: 'Dist::Zilla version 1.093400'
+generated_by: 'Dist::Zilla version 1.100160'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4
name: Data-Section
requires:
- Class::ISA: 0
+ ExtUtils::MakeMaker: 6.11
+ MRO::Compat: 0.09
Sub::Exporter: 0.979
+ Test::More: 0.88
resources:
repository: http://github.com/rjbs/data-section
-version: 0.093410
+version: 0.100270
Modified: trunk/libdata-section-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/Makefile.PL?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/Makefile.PL (original)
+++ trunk/libdata-section-perl/Makefile.PL Sat Jan 30 03:28:01 2010
@@ -4,20 +4,34 @@
-use ExtUtils::MakeMaker;
+use ExtUtils::MakeMaker 6.11;
-WriteMakefile(
- DISTNAME => 'Data-Section',
- NAME => 'Data::Section',
- AUTHOR => "Ricardo\ SIGNES\ \<rjbs\@cpan\.org\>",
- ABSTRACT => "read\ multiple\ hunks\ of\ data\ out\ of\ your\ DATA\ section",
- VERSION => '0.093410',
- EXE_FILES => [ qw() ],
- (eval { ExtUtils::MakeMaker->VERSION(6.31) } ? (LICENSE => 'perl') : ()),
- PREREQ_PM => {
- "Sub::Exporter" => '0.979',
- "Class::ISA" => '0',
- },
- test => {TESTS => 't/*.t'}
-);
+
+my %WriteMakefileArgs = (
+ 'test' => {
+ 'TESTS' => 't/*.t'
+ },
+ 'NAME' => 'Data::Section',
+ 'DISTNAME' => 'Data-Section',
+ 'AUTHOR' => 'Ricardo SIGNES <rjbs at cpan.org>',
+ 'ABSTRACT' => 'read multiple hunks of data out of your DATA section',
+ 'EXE_FILES' => [],
+ 'VERSION' => '0.100270',
+ 'LICENSE' => 'perl',
+ 'PREREQ_PM' => {
+ 'Test::More' => '0.88',
+ 'ExtUtils::MakeMaker' => '6.11',
+ 'Sub::Exporter' => '0.979',
+ 'MRO::Compat' => '0.09'
+ }
+ );
+
+
+delete $WriteMakefileArgs{LICENSE}
+ unless eval { ExtUtils::MakeMaker->VERSION(6.31) };
+
+WriteMakefile(%WriteMakefileArgs);
+
+
+
Modified: trunk/libdata-section-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/README?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/README (original)
+++ trunk/libdata-section-perl/README Sat Jan 30 03:28:01 2010
@@ -1,11 +1,11 @@
This archive contains the distribution Data-Section, version
-0.093410:
+0.100270:
read multiple hunks of data out of your DATA section
-This software is copyright (c) 2009 by Ricardo SIGNES.
+This software is copyright (c) 2010 by Ricardo SIGNES.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
Modified: trunk/libdata-section-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/debian/changelog?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/debian/changelog (original)
+++ trunk/libdata-section-perl/debian/changelog Sat Jan 30 03:28:01 2010
@@ -1,3 +1,13 @@
+libdata-section-perl (0.100270-1) UNRELEASED; urgency=low
+
+ * New upstream release
+ * Update copyright years
+ * Rewrite control description
+ * Standards-Version 3.8.4 (no changes)
+ * Depends on MRO::Compat and B-D-I Test::Simple 0.88
+
+ -- Jonathan Yu <jawnsy at cpan.org> Fri, 29 Jan 2010 22:38:52 -0500
+
libdata-section-perl (0.093410-1) unstable; urgency=low
[ Jonathan Yu ]
Modified: trunk/libdata-section-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/debian/control?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/debian/control (original)
+++ trunk/libdata-section-perl/debian/control Sat Jan 30 03:28:01 2010
@@ -3,19 +3,22 @@
Priority: optional
Build-Depends: debhelper (>= 7.0.50)
Build-Depends-Indep: perl, libsub-exporter-perl, libtest-perl-critic-perl,
- libtest-pod-perl, libtest-pod-coverage-perl, libpod-coverage-trustpod-perl
+ libtest-pod-perl, libtest-pod-coverage-perl, libpod-coverage-trustpod-perl,
+ libmro-compat-perl, perl (>= 5.10.1) | libtest-simple-perl (>= 0.88)
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Peter Pentchev <roam at ringlet.net>, Jonathan Yu <jawnsy at cpan.org>,
Nathan Handler <nhandler at ubuntu.com>
-Standards-Version: 3.8.3
+Standards-Version: 3.8.4
Homepage: http://search.cpan.org/dist/Data-Section/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libdata-section-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libdata-section-perl/
Package: libdata-section-perl
Architecture: all
-Depends: ${misc:Depends}, ${perl:Depends}, libsub-exporter-perl
+Depends: ${misc:Depends}, ${perl:Depends}, libsub-exporter-perl,
+ libmro-compat-perl
Description: module to read chunks of data from a module's DATA section
- Data::Section provides an easy way to access multiple named chunks of
- line-oriented data in your module's DATA section. It was written to allow
- modules to store their own templates, but probably has other uses.
+ Data::Section is a Perl module that provides an easy way to access multiple
+ named chunks of line-oriented data in your module's DATA section. It was
+ written to allow modules to store their own templates, but is probably useful
+ for other purposes as well.
Modified: trunk/libdata-section-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/debian/copyright?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/debian/copyright (original)
+++ trunk/libdata-section-perl/debian/copyright Sat Jan 30 03:28:01 2010
@@ -4,11 +4,11 @@
Name: Data-Section
Files: *
-Copyright: 2009, Ricardo SIGNES <rjbs at cpan.org>
+Copyright: 2010, Ricardo SIGNES <rjbs at cpan.org>
License: Artistic or GPL-1+
Files: debian/*
-Copyright: 2009, Jonathan Yu <jawnsy at cpan.org>
+Copyright: 2009-2010, Jonathan Yu <jawnsy at cpan.org>
2009, Nathan Handler <nhandler at ubuntu.com>
2009, Peter Pentchev <roam at ringlet.net>
License: Artistic or GPL-1+
Modified: trunk/libdata-section-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/dist.ini?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/dist.ini (original)
+++ trunk/libdata-section-perl/dist.ini Sat Jan 30 03:28:01 2010
@@ -5,7 +5,8 @@
[Prereq]
Sub::Exporter = 0.979
-Class::ISA = 0
+MRO::Compat = 0.09 ; bugfixes
+Test::More = 0.88 ; done_testing
[@RJBS]
Modified: trunk/libdata-section-perl/lib/Data/Section.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/lib/Data/Section.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/lib/Data/Section.pm (original)
+++ trunk/libdata-section-perl/lib/Data/Section.pm Sat Jan 30 03:28:01 2010
@@ -1,10 +1,10 @@
use strict;
use warnings;
package Data::Section;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
# ABSTRACT: read multiple hunks of data out of your DATA section
-use Class::ISA;
+use MRO::Compat 0.09;
use Sub::Exporter 0.979 -setup => {
groups => { setup => \'_mk_reader_group' },
collectors => { INIT => sub { $_[0] = { into => $_[1]->{into} } } },
@@ -30,7 +30,7 @@
my $template = $stash{ $pkg } = { };
my $dh = do { no strict 'refs'; \*{"$pkg\::DATA"} }; ## no critic Strict
- return $stash{ $pkg} unless defined fileno *$dh;
+ return $stash{ $pkg } unless defined fileno *$dh;
my $current;
if ($arg->{default_name}) {
@@ -55,6 +55,12 @@
return $stash{ $pkg };
};
+ $export{local_section_data_names} = sub {
+ my ($self) = @_;
+ my $method = $export{local_section_data};
+ return keys %{ $self->$method };
+ };
+
$export{merged_section_data} =
!$arg->{inherit} ? $export{local_section_data} : sub {
@@ -64,7 +70,7 @@
my $lsd = $export{local_section_data};
my %merged;
- for my $class (Class::ISA::self_and_super_path($pkg)) {
+ for my $class (@{ mro::get_linear_isa($pkg) }) {
# in case of c3 + non-$base item showing up
next unless $class->isa($base);
my $sec_data = $class->$lsd;
@@ -77,25 +83,30 @@
return \%merged;
};
+ $export{merged_section_data_names} = sub {
+ my ($self) = @_;
+ my $method = $export{merged_section_data};
+ return keys %{ $self->$method };
+ };
+
$export{section_data} = sub {
my ($self, $name) = @_;
my $pkg = ref $self ? ref $self : $self;
- my @to_check = $arg->{inherit}
- ? Class::ISA::self_and_super_path($pkg)
- : $pkg;
-
- my $lsd = $export{local_section_data}; # in case they use another name
-
- for my $class (@to_check) {
- # in case of c3 + non-$base item showing up
- next unless $class->isa($base);
-
- return $class->$lsd->{$name}
- if exists $class->$lsd->{$name};
- }
-
- return undef; ## no critic Undef
+ my $prefix = $arg->{inherit} ? 'merged' : 'local';
+ my $method = "$prefix\_section_data";
+
+ my $data = $self->$method;
+
+ return $data->{ $name };
+ };
+
+ $export{section_data_names} = sub {
+ my ($self) = @_;
+
+ my $prefix = $arg->{inherit} ? 'merged' : 'local';
+ my $method = "$prefix\_section_data_names";
+ return $self->$method;
};
return \%export;
@@ -113,7 +124,7 @@
=head1 VERSION
-version 0.093410
+version 0.100270
=head1 SYNOPSIS
@@ -197,6 +208,13 @@
You can use as many underscores as you want, and the space around the name is
optional. This pattern can be configured with the C<header_re> option (see
above).
+
+=head2 section_data_names
+
+ my @names = $pkg->section_data_names;
+
+This returns a list of all the names that will be recognized by the
+C<section_data> method.
=head2 merged_section_data
@@ -222,6 +240,13 @@
The keys in the returned hashref are the section names, and the values are
B<references to> the strings extracted from the data sections.
+=head2 merged_section_data_names
+
+ my @names = $pkg->merged_section_data_names;
+
+This returns a list of all the names that will be recognized by the
+C<merged_section_data> method.
+
=head2 local_section_data
my $data = $pkg->local_section_data;
@@ -233,6 +258,13 @@
This method needs to be used carefull, because it's weird. It returns only the
data for the package on which it was invoked. If the package on which it was
invoked has no data sections, it returns an empty hashref.
+
+=head2 local_section_data_names
+
+ my @names = $pkg->local_section_data_names;
+
+This returns a list of all the names that will be recognized by the
+C<local_section_data> method.
=head1 TIPS AND TRICKS
@@ -289,7 +321,7 @@
=head1 COPYRIGHT AND LICENSE
-This software is copyright (c) 2009 by Ricardo SIGNES.
+This software is copyright (c) 2010 by Ricardo SIGNES.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
Modified: trunk/libdata-section-perl/t/basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/basic.t?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/basic.t (original)
+++ trunk/libdata-section-perl/t/basic.t Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
use lib 't/lib';
-use Test::More tests => 20;
+use Test::More;
use Parent;
use Child;
@@ -39,15 +39,90 @@
);
}
+# The classes that do not begin with I:: are non-inheriting, so we do not
+# expect to see (for example) the parent's "b" section propagated to the
+# grandchild. -- rjbs, 2010-01-27
is_deeply(Parent ->section_data('a'), \"1\n", "Parent's a");
is_deeply(Parent ->section_data('b'), \"2\n", "Parent's b");
is_deeply(Grandchild->section_data('a'), \"111\n", "Grandchild's a");
is_deeply(Grandchild->section_data('b'), undef, "Grandchild's b (none)");
+is_deeply(
+ [ sort Parent->section_data_names ],
+ [ qw(a b c) ],
+ "Parent section data names",
+);
+
+is_deeply(
+ [ sort Parent->local_section_data_names ],
+ [ qw(a b c) ],
+ "Parent local section data names",
+);
+
+is_deeply(
+ [ sort Parent->merged_section_data_names ],
+ [ qw(a b c) ],
+ "Parent merged section data names",
+);
+
+is_deeply(
+ [ sort Child->section_data_names ],
+ [ qw(b c d) ],
+ "Child section data names",
+);
+
+is_deeply(
+ [ sort Child->local_section_data_names ],
+ [ qw(b c d) ],
+ "Child local section data names",
+);
+
+is_deeply(
+ [ sort Child->merged_section_data_names ],
+ [ qw(b c d) ],
+ "Child merged section data names",
+);
+
is_deeply(I::Parent ->section_data('a'), \"1\n", "I::Parent's a");
is_deeply(I::Parent ->section_data('b'), \"2\n", "I::Parent's b");
is_deeply(I::Grandchild->section_data('a'), \"111\n", "I::Grandchild's a");
is_deeply(I::Grandchild->section_data('b'), \"22\n", "I::Grandchild's b (via Child)");
+
+is_deeply(
+ [ sort I::Parent->section_data_names ],
+ [ qw(a b c) ],
+ "I::Parent section data names",
+);
+
+is_deeply(
+ [ sort I::Parent->local_section_data_names ],
+ [ qw(a b c) ],
+ "I::Parent local section data names",
+);
+
+is_deeply(
+ [ sort I::Parent->merged_section_data_names ],
+ [ qw(a b c) ],
+ "I::Parent merged section data names",
+);
+
+is_deeply(
+ [ sort I::Child->section_data_names ],
+ [ qw(a b c d) ],
+ "I::Child merged section data names",
+);
+
+is_deeply(
+ [ sort I::Child->local_section_data_names ],
+ [ qw(b c d) ],
+ "I::Child local section data names",
+);
+
+is_deeply(
+ [ sort I::Child->merged_section_data_names ],
+ [ qw(a b c d) ],
+ "I::Child merged section data names",
+);
is_deeply(
I::Grandchild->merged_section_data,
@@ -62,3 +137,5 @@
{ a => \"1\n", b => \"2\n" },
"default name in NoName",
);
+
+done_testing;
Modified: trunk/libdata-section-perl/t/lib/Child.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/Child.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/Child.pm (original)
+++ trunk/libdata-section-perl/t/lib/Child.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package Child;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Godfather;
use base qw(Parent Godfather);
1;
Modified: trunk/libdata-section-perl/t/lib/Godfather.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/Godfather.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/Godfather.pm (original)
+++ trunk/libdata-section-perl/t/lib/Godfather.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package Godfather;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
1;
__DATA__
__[a]__
Modified: trunk/libdata-section-perl/t/lib/Grandchild.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/Grandchild.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/Grandchild.pm (original)
+++ trunk/libdata-section-perl/t/lib/Grandchild.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package Grandchild;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use base 'Child';
1;
Modified: trunk/libdata-section-perl/t/lib/I/Child.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/I/Child.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/I/Child.pm (original)
+++ trunk/libdata-section-perl/t/lib/I/Child.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package I::Child;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Godfather;
use base qw(I::Parent Godfather);
1;
Modified: trunk/libdata-section-perl/t/lib/I/Grandchild.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/I/Grandchild.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/I/Grandchild.pm (original)
+++ trunk/libdata-section-perl/t/lib/I/Grandchild.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package I::Grandchild;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use base 'I::Child';
1;
Modified: trunk/libdata-section-perl/t/lib/I/Parent.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/I/Parent.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/I/Parent.pm (original)
+++ trunk/libdata-section-perl/t/lib/I/Parent.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package I::Parent;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Data::Section -setup;
1;
Modified: trunk/libdata-section-perl/t/lib/NoData.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/NoData.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/NoData.pm (original)
+++ trunk/libdata-section-perl/t/lib/NoData.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package NoData;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Data::Section -setup;
1;
Modified: trunk/libdata-section-perl/t/lib/NoName.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/NoName.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/NoName.pm (original)
+++ trunk/libdata-section-perl/t/lib/NoName.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package NoName;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Data::Section -setup => { default_name => 'a' };
1;
Modified: trunk/libdata-section-perl/t/lib/Parent.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-section-perl/t/lib/Parent.pm?rev=51805&op=diff
==============================================================================
--- trunk/libdata-section-perl/t/lib/Parent.pm (original)
+++ trunk/libdata-section-perl/t/lib/Parent.pm Sat Jan 30 03:28:01 2010
@@ -1,7 +1,7 @@
use strict;
use warnings;
package Parent;
-our $VERSION = '0.093410';
+our $VERSION = '0.100270';
use Data::Section -setup => { inherit => 0 };
1;
More information about the Pkg-perl-cvs-commits
mailing list