Naughty?

Message-ID: <20010506144702.A6308@penderel>

p4raw-id: //depot/perl@10011

diff --git a/t/op/my_stash.t b/t/op/my_stash.t
index 4a1d502..5a13183 100644 (file)
--- a/t/op/my_stash.t
+++ b/t/op/my_stash.t
@@ -14,6 +14,7 @@ use constant MyClass => 'Foo::Bar::Biz::Baz';
 
 {
     package Foo::Bar::Biz::Baz;
+    1;
 }
 
 for (qw(Foo Foo:: MyClass __PACKAGE__)) {