From 133fac12ff7e3894deb31a204a9a12453b87bbf0 Mon Sep 17 00:00:00 2001
From: Max Maischein <corion@corion.net>
Date: Tue, 11 Aug 2009 17:22:58 +0100
Subject: [PATCH] Restore t/harness path checks on Win32

Message-ID: <4A819742.8050109@corion.net>
---
 t/harness | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/harness b/t/harness
index 9e3af04..1eb85f1 100644
--- a/t/harness
+++ b/t/harness
@@ -212,7 +212,10 @@ if (@ARGV) {
 	my %total_time;
 
 	for (@last) {
-	    m!(.*/)! or die "'$_'";
+	    if ($^O eq 'MSWin32') {
+		s,\\,/,g; # canonicalize path
+	    };
+	    m!(.*[/])! or die "'$_'";
 	    push @{$dir{$1}}, $_;
 	    $total_time{$1} += $times{$_} || 0;
 	}
-- 
2.7.4