Skip Menu |

This queue is for tickets about the Mail-Box CPAN distribution.

Report information
The Basics
Id: 13217
Status: resolved
Priority: 0/
Queue: Mail-Box

People
Owner: Nobody in particular
Requestors: ntyni [...] iki.fi
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: (no value)
Fixed in: (no value)



Subject: Tools.pm not found during 'make test' with Test::Harness 2.48 (Perl 5.8.7)
Hi, with Perl 5.8.7 some of the tests fail with the following error message: 52manager/30collect....Can't locate Tools.pm in @INC (@INC contains: /home/markov/shared/perl/MimeTypes/lib /home/markov/shared/perl/UserIdentity/lib ./lib ../lib ../../lib tests lib blib/lib blib/arch /etc/perl /usr/local/lib/perl/5.8.7 /usr/local/share/perl/5.8.7 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.8 /usr/share/perl/5.8 /usr/local/lib/site_perl) at 52manager/30collect.t line 9. This seems to be because the 'use Tools' line is before 'use lib qw(. .. tests);' in the failing test scripts. I have tracked the regression to Test::Harness upgrade from 2.40 (included in Perl 5.8.4) to 2.48 (included in Perl 5.8.7). I have not investigated this further, as the correct fix seems to be just move the 'use lib' lines upward. The attached patch does this. For the record, here's the version information: - Mail-Box 2.060 - Perl 5.8.7 - Debian GNU/Linux (unstable) -- Niko Tyni ntyni@iki.fi
diff -ur libmail-box-perl-2.060/tests/52manager/20user.t libmail-box-perl-2.060-mod/tests/52manager/20user.t --- libmail-box-perl-2.060/tests/52manager/20user.t 2005-03-15 20:59:48.000000000 +0000 +++ libmail-box-perl-2.060-mod/tests/52manager/20user.t 2005-06-12 11:16:46.324764776 +0000 @@ -6,9 +6,9 @@ use warnings; use Test::More; +use lib qw(. .. tests); use Tools; -use lib qw(. .. tests); use Mail::Box::Manage::User; BEGIN diff -ur libmail-box-perl-2.060/tests/52manager/30collect.t libmail-box-perl-2.060-mod/tests/52manager/30collect.t --- libmail-box-perl-2.060/tests/52manager/30collect.t 2005-03-15 20:59:48.000000000 +0000 +++ libmail-box-perl-2.060-mod/tests/52manager/30collect.t 2005-06-12 11:17:39.227541284 +0000 @@ -6,9 +6,9 @@ use warnings; use Test::More; -use Tools; use lib qw(. .. tests); +use Tools; use Mail::Box::Manage::User; use Mail::Box::MH; diff -ur libmail-box-perl-2.060/tests/60imap/10fetch.t libmail-box-perl-2.060-mod/tests/60imap/10fetch.t --- libmail-box-perl-2.060/tests/60imap/10fetch.t 2005-03-15 20:59:48.000000000 +0000 +++ libmail-box-perl-2.060-mod/tests/60imap/10fetch.t 2005-06-12 11:26:29.347809822 +0000 @@ -6,9 +6,9 @@ use warnings; use Test::More; -use Tools; use lib qw(. .. tests); +use Tools; use Mail::Message; use Mail::Message::Body::Lines; use Mail::Server::IMAP4::Fetch; diff -ur libmail-box-perl-2.060/tests/60imap/20list.t libmail-box-perl-2.060-mod/tests/60imap/20list.t --- libmail-box-perl-2.060/tests/60imap/20list.t 2005-03-15 20:59:48.000000000 +0000 +++ libmail-box-perl-2.060-mod/tests/60imap/20list.t 2005-06-12 11:26:43.289478644 +0000 @@ -7,9 +7,9 @@ use warnings; use Test::More; -use Tools; use lib qw(. .. tests); +use Tools; use Mail::Server::IMAP4::List; use Mail::Box::MH; use Mail::Box::Identity;
Test::Harness in combination with 'use lib' and -T has bitten me a few times before. The behavior has changed a few times. Patches applied.