cleanup

[urisagit/Perl-Docs.git] / t / inode.t

diff --git a/t/inode.t b/t/inode.t
index 878e841..377b32c 100644 (file)
--- a/t/inode.t
+++ b/t/inode.t
@@ -2,11 +2,14 @@
 
 use strict ;
 
+use File::Slurp ;
+
 use Carp ;
 use Socket ;
 use Symbol ;
 use Test::More ;
 
+
 BEGIN{ 
 
        if( $^O =~ '32' ) {
@@ -14,10 +17,8 @@ BEGIN{
                exit ;
        }
        else {
-               plan tests => 3 ;
+               plan tests => 2 ;
        }
-
-       use_ok( 'File::Slurp', ) ;
 }
 
 my $data = <<TEXT ;