Package: libperl-minimumversion-perl
Version: 1.24-1
Severity: important
Forwarded: http://rt.cpan.org/Ticket/Display.html?id=56081
User: debian-p...@lists.debian.org
Usertags: perl-5.12-transition
Tags: patch
The test suite fails with Perl 5.12.0:
t/01_compile.t .... ok
Invalid version format (non-numeric data) at
/build/niko-libperl-minimumversion-perl_1.24-1-amd64-8955Gg/libperl-minimumversion-perl-1.24/blib/lib/Perl/MinimumVersion.pm
line 378.
# Looks like you planned 74 tests but ran 65.
# Looks like your test exited with 255 just after 65.
t/02_main.t .......
Dubious, test returned 255 (wstat 65280, 0xff00)
Failed 9/74 subtests
t/03_open_3arg.t .. ok
t/04_substr.t ..... ok
t/05_foreach.t .... ok
t/06_weaken.t ..... ok
t/07_splice.t ..... ok
t/08_mkdir.t ...... ok
t/97_meta.t ....... ok
t/98_pod.t ........ ok
Invalid version format (version required) at
/usr/share/perl5/Test/MinimumVersion.pm line 60.
# Looks like your test exited with 255 before it could output anything.
t/99_pmv.t ........
Dubious, test returned 255 (wstat 65280, 0xff00)
Failed 14/14 subtests
This is [rt.cpan.org #56081].
The t/02_main.t failure is fixed in the upstream SVN repository at
http://svn.ali.as/cpan/trunk/Perl-MinimumVersion/
Patch attached.
The t/99_pmv.t failure is caused by the separate Test::MinimumVersion module and
is fixed in the CPAN version 0.101080. I'll file a separate bug about that.
--
Niko Tyni nt...@debian.org
--- lib/Perl/MinimumVersion.pm (revision 11095)
+++ lib/Perl/MinimumVersion.pm (working copy)
@@ -375,7 +375,7 @@
$limit = version->new("$limit");
}
if ( defined $self->{syntax} ) {
- if ( $self->{syntax} >= $limit ) {
+ if ( $self->{syntax}->version >= $limit ) {
# Previously discovered minimum is what they want
return $self->{syntax};
}
