0001-use-File-Spec-canonpath-to-check-the-path.patch

From 93ab3cc5e4cee992cdd8cb0737c33f745f6852a1 Mon Sep 17 00:00:00 2001
From: mattn <[email protected]>
Date: Fri, 5 Jun 2009 15:12:18 +0900
Subject: [PATCH] use File::Spec->canonpath() to check the path.

---
 t/path_to.t |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/t/path_to.t b/t/path_to.t
index 1b5b10a..2c1b7d5 100644
--- a/t/path_to.t
+++ b/t/path_to.t
@@ -1,5 +1,6 @@
 use Test::Base;
 use FindBin;
+use File::Spec;
 
 use lib "$FindBin::Bin/path_to/lib";
 use TestApp;
@@ -9,4 +10,4 @@ plan 'no_plan';
 my $app = TestApp->new;
 $app->setup;
 
-is($app->path_to->stringify, "$FindBin::Bin/path_to", 'path_to ok');
+is(File::Spec->canonpath($app->path_to->stringify), File::Spec->canonpath("$FindBin::Bin/path_to"), 'path_to ok');
-- 
1.6.3.msysgit.0