[Module-build-checkins] Module-Build/t destinations.t,1.36,1.37
Status: Beta
Brought to you by:
kwilliams
From: Randy W. S. <si...@us...> - 2005-12-01 08:16:27
|
Update of /cvsroot/module-build/Module-Build/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13331/t Modified Files: destinations.t Log Message: Temporary fix: The Test::Harness with perl 5.005 doesn't seem to like Test::More 'no_plan'. We'll soon rewrite these tests anyway to use fixed configurations to test on rather than using whatever configuration happens to exist on the testers system. Index: destinations.t =================================================================== RCS file: /cvsroot/module-build/Module-Build/t/destinations.t,v retrieving revision 1.36 retrieving revision 1.37 diff -u -d -r1.36 -r1.37 --- destinations.t 21 Nov 2005 03:29:42 -0000 1.36 +++ destinations.t 1 Dec 2005 08:16:19 -0000 1.37 @@ -3,7 +3,7 @@ use lib 't/lib'; use strict; -use Test::More 'no_plan'; # tests => 68; +use Test::More 'no_plan' => 1; #tests => 92; use File::Spec (); @@ -213,9 +213,13 @@ my $dest = $mb->install_destination( $type ); ok $mb->dir_contains($prefix, $dest), "$type prefixed"; - if( $test_config && $test_config->{$type} ) { - have_same_ending($dest, $test_config->{$type}, - " suffix correctish ($test_config->{$type} + $prefix = $dest)" ); + SKIP: { + skip( "'$type' not configured", 1 ) + unless $test_config && $test_config->{$type}; + + have_same_ending( $dest, $test_config->{$type}, + " suffix correctish " . + "($test_config->{$type} + $prefix = $dest)" ); } } } |