X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FDevel%2FPPPort%2Ft%2Fmisc.t;h=6171ef2eea770a1434b273799ce471d9515e788a;hb=c07deaaf08ed19dc6900ffcd24cb585805441278;hp=711b547604a9686479320fdb0e4fe6249b5b193b;hpb=e638c62455531365fde53d9d25a44d20ac62f598;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/Devel/PPPort/t/misc.t b/ext/Devel/PPPort/t/misc.t index 711b547..6171ef2 100644 --- a/ext/Devel/PPPort/t/misc.t +++ b/ext/Devel/PPPort/t/misc.t @@ -21,12 +21,13 @@ BEGIN { unshift @INC, 't'; } - eval "use Test"; - if ($@) { - require 'testutil.pl'; - print "1..42\n"; + sub load { + eval "use Test"; + require 'testutil.pl' if $@; } - else { + + if (42) { + load(); plan(tests => 42); } }