Really check that sysread(I, $x, 1, -4) dies with "Offset outside string"

[p5sagit/p5-mst-13.2.git] / t / op / my_stash.t

diff --git a/t/op/my_stash.t b/t/op/my_stash.t
index 1e93fc7..5f7d245 100644 (file)
--- a/t/op/my_stash.t
+++ b/t/op/my_stash.t
@@ -5,11 +5,10 @@ package Foo;
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
+    require './test.pl';
 }
 
-use Test;
-
-plan tests => 7;
+plan 7;
 
 use constant MyClass => 'Foo::Bar::Biz::Baz';