[Module-build-checkins] Module-Build/t versions.t,1.3,1.4

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

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

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

Index: versions.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/versions.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- versions.t	1 Aug 2003 03:28:13 -0000	1.3
+++ versions.t	28 Jun 2005 03:58:40 -0000	1.4
@@ -1,13 +1,19 @@
-#!/usr/bin/perl
+#!/usr/bin/perl -w
 
+use lib 't/lib';
 use strict;
-use Test;
-BEGIN { plan tests => 2 }
+
+use Test::More tests => 2;
+
+use Cwd ();
+my $cwd = Cwd::cwd;
+
+#########################
 
 use Module::Build;
 use File::Spec;
 
 my $file = File::Spec->catfile('t', 'Sample', 'lib', 'Sample.pm');
-ok( Module::Build->version_from_file( $file ), '0.01', 'version_from_file' );
+is( Module::Build->version_from_file( $file ), '0.01', 'version_from_file' );
 
-ok( Module::Build->compare_versions( '1.01_01', '>', '1.01' ), 1, 'compare: 1.0_01 > 1.0' );
+ok( Module::Build->compare_versions( '1.01_01', '>', '1.01' ), 'compare: 1.0_01 > 1.0' );