From: Michael G. Schwern <schwern@pobox.com>
Date: Thu, 30 Oct 2003 15:51:03 +0000 (-0800)
Subject: Rewrite to correctly use test.pl
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f7218ed4fb64f81a57ca3333cb9e28f01f115558;p=p5sagit%2Fp5-mst-13.2.git

Rewrite to correctly use test.pl
Subject: Re: Fix for the orange lion bug - aka empty sub bug
Message-ID: <20031030235103.GC27017@localhost.comcast.net>

p4raw-id: //depot/perl@21583
---

diff --git a/t/op/sub.t b/t/op/sub.t
index b76d34c..b6f90f4 100644
--- a/t/op/sub.t
+++ b/t/op/sub.t
@@ -1,12 +1,12 @@
-#!./perl
+#!./perl -w
 
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
-    require Config; import Config;
+    require './test.pl';
 }
 
-use Test::More tests => 4;
+plan( tests => 4 );
 
 sub empty_sub {}