[Module-build-checkins] Module-Build/t destinations.t,1.25,1.26

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

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

Modified Files:
	destinations.t 
Log Message:
I don't think we need this PREFIX test, it should be handled in
compat.t.  Also some slight readability fixes.


Index: destinations.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/destinations.t,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -d -r1.25 -r1.26
--- destinations.t	4 Aug 2005 03:13:06 -0000	1.25
+++ destinations.t	27 Sep 2005 19:03:36 -0000	1.26
@@ -27,11 +27,6 @@
 
 #########################
 
-TODO: {
-  local $TODO = 'Test PREFIX pass-thru to compat Makefile.PL';
-  ok 0, 'PREFIX';
-}
-
 use Module::Build;
 my $mb = Module::Build->new_from_context;
 isa_ok( $mb, 'Module::Build::Base' );
@@ -199,10 +194,10 @@
         like( $dest, "/^\Q$prefix\E/", "$type prefixed");
 
         if( $test_config && $test_config->{$type} ) {
-            my @test_dirs = splitdir( $test_config->{$type} );
             my @dest_dirs = splitdir( $dest );
+            my @test_dirs = splitdir( $test_config->{$type} );
 
-            is( $dest_dirs[-1], $test_dirs[-1], '  suffix correctish' );
+            is( $dest_dirs[-1], $test_dirs[-1], "  suffix correctish ($dest vs $test_config->{$type})" );
         }
     }
 }