module-build-checkins

[Randy W. S. <si...@us...>]

Update of /cvsroot/module-build/Module-Build/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23650/t

Modified Files:
	files.t 
Log Message:
use Test::More

Index: files.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/files.t,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- files.t	10 May 2004 03:27:55 -0000	1.2
+++ files.t	23 Jun 2005 07:46:32 -0000	1.3
@@ -1,10 +1,11 @@
 
 use strict;
-use Test;
-plan tests => 6;
+
+use Test::More tests => 6;
 
 use File::Spec;
 use IO::File;
+
 use Module::Build;
 ok(1);
 
@@ -23,7 +24,7 @@
     unless (-d $tmp) {
       mkdir($tmp, 0777) or die "Can't create $tmp: $!";
     }
-    ok -d $tmp, 1;
+    ok -d $tmp;
     $tmp[$_] = $tmp;
   }
   
@@ -33,12 +34,12 @@
   my $fh = IO::File->new($file, '>') or die "Can't create $file: $!";
   print $fh "Foo\n";
   $fh->close;
-  ok -e $file, 1;
+  ok -e $file;
   
   
   my $file2 = $m->copy_if_modified(from => $file, to_dir => $tmp[2]);
   ok $file2;
-  ok -e $file2, 1;
+  ok -e $file2;
 }
 
 $m->delete_filetree(@files);