[Module-build-checkins] Module-Build/t runthrough.t,1.47,1.48

[Ken W. <kwi...@us...>]

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

Modified Files:
	runthrough.t 
Log Message:
little code cleanup

Index: runthrough.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/runthrough.t,v
retrieving revision 1.47
retrieving revision 1.48
diff -C2 -d -r1.47 -r1.48
*** runthrough.t	20 Nov 2004 14:17:38 -0000	1.47
--- runthrough.t	21 Nov 2004 04:03:54 -0000	1.48
***************
*** 82,88 ****
    my $fh = IO::File->new(File::Spec->catfile($goto, 'META.yml'));
    my $contents = do {local $/; <$fh>};
- 
    $contents =~ /Module::Build version ([0-9_.]+)/m;
!   ok $1, $build->VERSION, "Got $1, expected ". $build->VERSION;
    
    if ($build->check_installed_status('Archive::Tar', 0)
--- 82,87 ----
    my $fh = IO::File->new(File::Spec->catfile($goto, 'META.yml'));
    my $contents = do {local $/; <$fh>};
    $contents =~ /Module::Build version ([0-9_.]+)/m;
!   ok $1, $build->VERSION, "Check version used to create META.yml";;
    
    if ($build->check_installed_status('Archive::Tar', 0)