r75030 - in /branches/upstream/libversion-perl/current: Changes META.yml README lib/version.pm t/01base.t t/02derived.t t/03require.t t/coretests.pm vperl/vpp.pm vutil/lib/version/vxs.pm
ansgar at users.alioth.debian.org
ansgar at users.alioth.debian.org
Thu Jun 2 11:27:21 UTC 2011
Author: ansgar
Date: Thu Jun 2 11:27:11 2011
New Revision: 75030
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=75030
Log:
[svn-upgrade] new version libversion-perl (0.9000)
Modified:
branches/upstream/libversion-perl/current/Changes
branches/upstream/libversion-perl/current/META.yml
branches/upstream/libversion-perl/current/README
branches/upstream/libversion-perl/current/lib/version.pm
branches/upstream/libversion-perl/current/t/01base.t
branches/upstream/libversion-perl/current/t/02derived.t
branches/upstream/libversion-perl/current/t/03require.t
branches/upstream/libversion-perl/current/t/coretests.pm
branches/upstream/libversion-perl/current/vperl/vpp.pm
branches/upstream/libversion-perl/current/vutil/lib/version/vxs.pm
Modified: branches/upstream/libversion-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/Changes?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/Changes (original)
+++ branches/upstream/libversion-perl/current/Changes Thu Jun 2 11:27:11 2011
@@ -1,8 +1,67 @@
+2011-06-01 John Peacock <john.peacock at havurah-software.org>
+
+ * .hgtags:
+ Tagging version '0.90' using shipit.
+ [30cea8f2eac2] [tip]
+
+ * README:
+ Remember to edit README this time
+ [137df6eaa22c] [0.90]
+
+ * lib/version.pm, t/01base.t, t/02derived.t, t/03require.t,
+ vperl/vpp.pm, vutil/lib/version/vxs.pm:
+ Sloppy release for 0.89; I forgot to bump all of the release tests.
+ Do this now and resolve:
+
+ https://rt.cpan.org/Ticket/Display.html?id=68588
+ [e7b1d5a01256]
+
+2011-05-31 John Peacock <john.peacock at havurah-software.org>
+
+ * .hgtags:
+ Tagging version '0.89' using shipit.
+ [5cf121b754b6]
+
+ * vperl/vpp.pm:
+ Act like vxs version and always use version->new method for
+ qv/declare, then rebless into inherited class
+ [1eb73dd9059b] [0.89]
+
+ * t/02derived.t, t/coretests.pm:
+ Failing test case with version::vpp only
+ [7dedb7cb50d0]
+
+ * t/03require.t:
+ More bumping
+ [131ed8486036]
+
+ * lib/version.pm, vperl/vpp.pm, vutil/lib/version/vxs.pm:
+ Bump $VERSION prior to testing new changes.
+ [d38b0fc42650]
+
+ * README:
+ Remove discussion of Build.PL (no longer supported) Resolves
+ https://rt.cpan.org/Ticket/Display.html?id=66206
+ [4a16bc27cffa]
+
+2010-12-20 John Peacock <john.peacock at havurah-software.org>
+
+ * .hgtags:
+ Tagging version '0.88' using shipit.
+ [a1d7151ace67]
+
+2010-12-19 John Peacock <john.peacock at havurah-software.org>
+
+ * Makefile.PL, README, lib/version.pm, t/01base.t, t/02derived.t,
+ t/03require.t, vperl/vpp.pm, vutil/lib/version/vxs.pm:
+ Tweak Makefile.PL to make Strawberry Perl happy.
+ [36b62c0768b4] [0.88]
+
2010-12-09 John Peacock <john.peacock at havurah-software.org>
* .hgtags:
Tagging version '0.87' using shipit.
- [f8caa8f3a657] [tip]
+ [f8caa8f3a657]
* Build.PL, MANIFEST, Makefile.PL, README, lib/version.pm, t/01base.t,
t/02derived.t, t/03require.t, vperl/vpp.pm,
Modified: branches/upstream/libversion-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/META.yml?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/META.yml (original)
+++ branches/upstream/libversion-perl/current/META.yml Thu Jun 2 11:27:11 2011
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: version
-version: 0.88
+version: 0.90
abstract: Structured version objects
author:
- John Peacock <jpeacock at cpan.org>
Modified: branches/upstream/libversion-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/README?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/README (original)
+++ branches/upstream/libversion-perl/current/README Thu Jun 2 11:27:11 2011
@@ -1,4 +1,4 @@
-version 0.88
+version 0.90
==================================
Full version object support, with patch for bug in Perl 5.10.0 core
@@ -9,11 +9,25 @@
5.10.0 to segfault. As long as some module calls 'use version', then the
replacement code will take effect and Perl will not crash.
+Major Changes in 0.90 - 2011-06-01
+=====================================
+Make all tests pass even with older Test::More releases. Resolves
+
+ https://rt.cpan.org/Ticket/Display.html?id=68588
+
+Major Changes in 0.89 - 2011-05-31
+=====================================
+Change behavior of pure Perl qv/declare to match the core/XS behavior; do
+not use parent's new() class for derived classes. This breaks
+encapsulation but I can justify it because qv/declare is a very specific
+thing that shouldn't be casually overridden (unless you do it directly in the
+subclass).
+
Major Changes in 0.88 - 2010-12-19
=====================================
Fix Makefile.PL to make Strawberry Perl happy. Resolves:
- https://rt.cpan.org/Public/Bug/Display.html?id=63991
+ https://rt.cpan.org/Public/Bug/Display.html?id=63991
Major Changes in 0.87 - 2010-12-09
=====================================
@@ -122,34 +136,18 @@
To install this module type the following:
- $ perl Build.PL
- $ ./Build
- $ ./Build test
- # ./Build install
-
-This release includes an optional pure Perl implementation (in case
-you don't have a C-compiler or if some reason you want your code to be
-much slower). You can test it by calling the build script as
-
- $ perl Build.PL --perl_only
-
-and it will install the Perl only version.
-
-OR
-
-To install with ExtUtils::MakeMaker:
-
$ perl Makefile.PL
$ make
$ make test
# make install
-and correspondingly
+This release includes an optional pure Perl implementation (in case
+you don't have a C-compiler or if some reason you want your code to be
+much slower). You can test it by replacing the first line above with:
$ perl Makefile.PL --perl_only
-will install the Perl only version.
-
+and it will install the Perl only version.
DEPENDENCIES
Modified: branches/upstream/libversion-perl/current/lib/version.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/lib/version.pm?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/lib/version.pm (original)
+++ branches/upstream/libversion-perl/current/lib/version.pm Thu Jun 2 11:27:11 2011
@@ -6,7 +6,8 @@
use vars qw(@ISA $VERSION $CLASS $STRICT $LAX *declare *qv);
-$VERSION = 0.88;
+$VERSION = '0.90';
+$VERSION = eval($VERSION);
$CLASS = 'version';
Modified: branches/upstream/libversion-perl/current/t/01base.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/t/01base.t?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/t/01base.t (original)
+++ branches/upstream/libversion-perl/current/t/01base.t Thu Jun 2 11:27:11 2011
@@ -9,7 +9,7 @@
BEGIN {
require "t/coretests.pm";
- use_ok('version', 0.88);
+ use_ok('version', 0.90);
}
diag "Tests with base class" if $Verbose;
Modified: branches/upstream/libversion-perl/current/t/02derived.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/t/02derived.t?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/t/02derived.t (original)
+++ branches/upstream/libversion-perl/current/t/02derived.t Thu Jun 2 11:27:11 2011
@@ -10,7 +10,7 @@
BEGIN {
require "t/coretests.pm";
- use_ok("version", 0.88);
+ use_ok("version", 0.90);
# If we made it this far, we are ok.
}
@@ -19,6 +19,21 @@
package version::Bad;
use base 'version';
sub new { my($self,$n)=@_; bless \$n, $self }
+
+# Bad subclass for SemVer failures seen with pure Perl version.pm only
+package version::Bad2;
+use base 'version';
+sub new {
+ my ($class, $val) = @_;
+ die 'Invalid version string format' unless version::is_strict($val);
+ my $self = $class->SUPER::new($val);
+ return $self;
+}
+sub declare {
+ my ($class, $val) = @_;
+ my $self = $class->SUPER::declare($val);
+ return $self;
+}
package main;
@@ -80,3 +95,12 @@
eval { my $test = ($testobj > 1.0) };
like($@, qr/Invalid version object/,
"Bad subclass vcmp");
+
+# Bad subclassing for SemVer with pure Perl version.pm only
+eval { my $test = version::Bad2->new("01.1.2") };
+like($@, qr/Invalid version string format/,
+ "Correctly found invalid version");
+
+eval { my $test = version::Bad2->declare("01.1.2") };
+unlike($@, qr/Invalid version string format/,
+ "Correctly ignored invalid version");
Modified: branches/upstream/libversion-perl/current/t/03require.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/t/03require.t?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/t/03require.t (original)
+++ branches/upstream/libversion-perl/current/t/03require.t Thu Jun 2 11:27:11 2011
@@ -13,7 +13,7 @@
# Don't want to use, because we need to make sure that the import doesn't
# fire just yet (some code does this to avoid importing qv() and delare()).
require_ok("version");
-is $version::VERSION, 0.88, "Make sure we have the correct class";
+is $version::VERSION, 0.90, "Make sure we have the correct class";
ok(!"main"->can("qv"), "We don't have the imported qv()");
ok(!"main"->can("declare"), "We don't have the imported declare()");
Modified: branches/upstream/libversion-perl/current/t/coretests.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/t/coretests.pm?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/t/coretests.pm (original)
+++ branches/upstream/libversion-perl/current/t/coretests.pm Thu Jun 2 11:27:11 2011
@@ -475,7 +475,6 @@
my $warning;
local $SIG{__WARN__} = sub { $warning = $_[0] };
-$DB::single = 1;
my $v = eval { $CLASS->$method('1,7') };
# is( $@, "", 'Directly test comma as decimal compliance');
Modified: branches/upstream/libversion-perl/current/vperl/vpp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/vperl/vpp.pm?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/vperl/vpp.pm (original)
+++ branches/upstream/libversion-perl/current/vperl/vpp.pm Thu Jun 2 11:27:11 2011
@@ -121,7 +121,7 @@
use POSIX qw/locale_h/;
use locale;
use vars qw ($VERSION @ISA @REGEXS);
-$VERSION = 0.88;
+$VERSION = 0.90;
use overload (
'""' => \&stringify,
@@ -794,8 +794,8 @@
$value = _un_vstring($value);
$value = 'v'.$value unless $value =~ /(^v|\d+\.\d+\.\d)/;
- my $version = $class->new($value);
- return $version;
+ my $obj = version->new($value);
+ return bless $obj, $class;
}
*declare = \&qv;
Modified: branches/upstream/libversion-perl/current/vutil/lib/version/vxs.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libversion-perl/current/vutil/lib/version/vxs.pm?rev=75030&op=diff
==============================================================================
--- branches/upstream/libversion-perl/current/vutil/lib/version/vxs.pm (original)
+++ branches/upstream/libversion-perl/current/vutil/lib/version/vxs.pm Thu Jun 2 11:27:11 2011
@@ -6,7 +6,7 @@
use vars qw(@ISA $VERSION $CLASS );
-$VERSION = 0.88;
+$VERSION = 0.90;
$CLASS = 'version::vxs';
More information about the Pkg-perl-cvs-commits
mailing list