Author: dagolden
Date: Mon Jun 22 13:38:29 2009
New Revision: 12880

Modified:
   Module-Build/trunk/t/compat.t

Log:
use File::Spec to fix slashes in compat.t recursive test files test

Modified: Module-Build/trunk/t/compat.t
==============================================================================
--- Module-Build/trunk/t/compat.t       (original)
+++ Module-Build/trunk/t/compat.t       Mon Jun 22 13:38:29 2009
@@ -281,7 +281,11 @@
 
   create_makefile_pl('traditional', $mb);
   my $args = extract_writemakefile_args() || {};
-  is $args->{TESTS}, 't/*.t t/deep/*.t',
+  is $args->{TESTS}, 
+    join( q{ }, 
+      File::Spec->catfile(qw(t *.t)),
+      File::Spec->catfile(qw(t deep *.t))
+    ),
     'Makefile.PL has correct TESTS line for recursive test files';
 }
 

Reply via email to