X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSwitch%2Ft%2Fswitch.t;h=5f5451d34e3af19dc8d963ce3aad10f8ba68d8c8;hb=88587957d5515b280bc1becf23e9f6520d5dce08;hp=7b147c0d9ef009227b9cc42a870098b52441da13;hpb=e3b2f2afc4d28243cf088b06f65acc79e00144f5;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/Switch/t/switch.t b/lib/Switch/t/switch.t
index 7b147c0..5f5451d 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);