From 88587957d5515b280bc1becf23e9f6520d5dce08 Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Sun, 7 Oct 2001 21:53:33 +0100 Subject: & what's to be done for 5.8.0? Message-ID: <20011007205333.S38756@plum.flirble.org> p4raw-id: //depot/perl@12356 --- lib/Switch/t/given.t | 5 +++++ lib/Switch/t/nested.t | 7 +++++++ lib/Switch/t/switch.t | 5 +++++ 3 files changed, 17 insertions(+) (limited to 'lib/Switch/t') diff --git a/lib/Switch/t/given.t b/lib/Switch/t/given.t index 57e72de38d..d47541a9cb 100755 --- a/lib/Switch/t/given.t +++ b/lib/Switch/t/given.t @@ -1,5 +1,10 @@ #! /usr/local/bin/perl -w +BEGIN { + chdir 't' if -d 't'; + @INC = '../lib'; +} + use Carp; use Switch qw(Perl6 __ fallthrough); diff --git a/lib/Switch/t/nested.t b/lib/Switch/t/nested.t index 032d3a6aef..b4aceac345 100755 --- a/lib/Switch/t/nested.t +++ b/lib/Switch/t/nested.t @@ -1,3 +1,10 @@ +#! /usr/local/bin/perl -w + +BEGIN { + chdir 't' if -d 't'; + @INC = '../lib'; +} + use Switch; print "1..4\n"; diff --git a/lib/Switch/t/switch.t b/lib/Switch/t/switch.t index 7b147c0d9e..5f5451d34e 100755 --- a/lib/Switch/t/switch.t +++ b/lib/Switch/t/switch.t @@ -1,5 +1,10 @@ #! /usr/local/bin/perl -w +BEGIN { + chdir 't' if -d 't'; + @INC = '../lib'; +} + use Carp; use Switch qw(__ fallthrough); -- cgit v1.2.1