Make next_edgecases.t easier to deal with
authorFather Chrysostomos <sprout@cpan.org>
Wed, 1 Dec 2010 06:31:41 +0000 (22:31 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 1 Dec 2010 13:20:42 +0000 (05:20 -0800)
This makes ./perl -Ilib t/mro/next_edgecases.t work and also
allows test functions to be called without parentheses.

t/mro/next_edgecases.t

index ff3272d..c0da963 100644 (file)
@@ -3,7 +3,9 @@
 use strict;
 use warnings;
 
-require q(./test.pl); plan(tests => 12);
+BEGIN { chdir 't'; require q(./test.pl); @INC = qw "../lib lib" }
+
+plan(tests => 12);
 
 {