1 files changed, 5 insertions, 12 deletions
diff --git a/dist/Math-BigInt/t/mbi_rand.t b/dist/Math-BigInt/t/mbi_rand.t
index e2bf6637de..a6e3b21c8b 100644
--- a/dist/Math-BigInt/t/mbi_rand.t
+++ b/dist/Math-BigInt/t/mbi_rand.t
@@ -1,21 +1,14 @@
 #!/usr/bin/perl -w
 
-use Test::More;
 use strict;
 
 my $count;
-  
-BEGIN
-  {
-  $| = 1;
-  if ($^O eq 'os390') { print "1..0\n"; exit(0) } # test takes too long there
-  unshift @INC, '../lib'; # for running manually
-  my $location = $0; $location =~ s/mbi_rand.t//;
-  unshift @INC, $location; # to locate the testing files
-  chdir 't' if -d 't';
+
+BEGIN {
   $count = 128;
-  plan tests => $count*4;
-  }
+}
+
+use Test::More tests => $count*4;
 
 use Math::BigInt;
 my $c = 'Math::BigInt';