Skip Menu |

This queue is for tickets about the lib CPAN distribution.

Report information
The Basics
Id: 96927
Status: new
Priority: 0/
Queue: lib

Owner: Nobody in particular
Requestors: jkeenan [...]

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

Subject: dist/lib/t/01lib.t: Add description for test lacking one
MIME-Version: 1.0
X-Mailer: MIME-tools 5.504 (Entity 5.504)
X-RT-Interface: Web
Message-ID: <rt-4.0.18-24556-1404435681-5.0-0-0 [...]>
X-RT-Original-Encoding: utf-8
Content-Type: multipart/mixed; boundary="----------=_1404435681-24556-4"
X-RT-Encrypt: 0
X-RT-Sign: 0
Content-Length: 0
Content-Disposition: inline
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: binary
Content-Length: 247
Download (untitled) / with headers
text/plain 247b
I committed the attached patch to the version of dist/lib/t/01lib.t in Perl 5 blead before I realized that it was dual-life. As I only changed a test file, I didn't increment the version number. Hope that's okay. Thank you very much. Jim Keenan
Subject: dist_lib_t_01lib_t.diff
MIME-Version: 1.0
Content-Type: text/x-patch; name="dist_lib_t_01lib_t.diff"
X-Mailer: MIME-tools 5.504 (Entity 5.504)
Content-Disposition: inline; filename="dist_lib_t_01lib_t.diff"
Content-Transfer-Encoding: binary
Content-Length: 474
diff --git a/dist/lib/t/01lib.t b/dist/lib/t/01lib.t index f58fce5..2a103d4 100644 --- a/dist/lib/t/01lib.t +++ b/dist/lib/t/01lib.t @@ -62,7 +62,7 @@ BEGIN { is( eval { do '' }, 42, 'do() works' ); ok( eval { require Yup; }, ' require()' ); ok( eval "use Yup; 1;", ' use()' ); - is( $@, '' ); + is( $@, '', 'last "eval()" parsed and executed correctly' ); is_deeply(\@OrigINC, \@lib::ORIG_INC, '@lib::ORIG_INC' ); }

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to