[p5sagit/p5-mst-13.2.git] / ext / Test-Simple / t / versions.t

#!/usr/bin/perl -w

# Make sure all the modules have the same version
#
# TBT has its own version system.

use strict;
use Test::More;

require Test::Builder;
require Test::Builder::Module;
require Test::Simple;

my $dist_version = $Test::More::VERSION;

like( $dist_version, qr/^ \d+ \. \d+ $/x );
is( $dist_version, $Test::Builder::VERSION,             'Test::Builder' );
is( $dist_version, $Test::Builder::Module::VERSION,     'TB::Module' );
is( $dist_version, $Test::Simple::VERSION,              'Test::Simple' );

done_testing(4);
Commit	Line	Data
3e887aae	1	#!/usr/bin/perl -w
	2
	3	# Make sure all the modules have the same version
	4	#
	5	# TBT has its own version system.
	6
	7	use strict;
	8	use Test::More;
	9
	10	require Test::Builder;
	11	require Test::Builder::Module;
	12	require Test::Simple;
	13
	14	my $dist_version = $Test::More::VERSION;
	15
	16	like( $dist_version, qr/^ \d+ \. \d+ $/x );
	17	is( $dist_version, $Test::Builder::VERSION, 'Test::Builder' );
	18	is( $dist_version, $Test::Builder::Module::VERSION, 'TB::Module' );
	19	is( $dist_version, $Test::Simple::VERSION, 'Test::Simple' );
	20
	21	done_testing(4);