[perl-ExtUtils-Depends] Fix win32 test failure in t/02_save_load.t



commit 5976a6e63249a28134c5d823286dceff205a25e6
Author: C.H. Kang <AERO cpan org>
Date:   Sat May 10 16:16:46 2014 +0200

    Fix win32 test failure in t/02_save_load.t

 t/02_save_load.t |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/t/02_save_load.t b/t/02_save_load.t
index 101acf8..c68fa3f 100644
--- a/t/02_save_load.t
+++ b/t/02_save_load.t
@@ -80,7 +80,7 @@ like ($info->{inc}, $install_part);
 isnt (index($info->{inc}, $inc), -1);
 
 my @typemaps_expected = map { my $t = $_; $t =~ s#build/##; $t } @typemaps;
-sub strip_typemap { my $t = $_; $t =~ s#.*DepTest/Install/##; $t }
+sub strip_typemap { my $t = $_; my $tmp = catfile('DepTest','Install',' '); $tmp =~ s# $##; $t =~ 
s#.*\Q$tmp\E##; $t }
 is_deeply (
   [ map { strip_typemap($_) } @{$info->{typemaps}} ],
   \ typemaps_expected,


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]