From: Jonathan Rockway <jon@jrock.us>
Date: Mon, 15 Dec 2008 10:35:25 +0000 (+0000)
Subject: don't reject win32 filenames (Yappo)
X-Git-Tag: 0.64~12
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7176be9beca87b047f077bd71019e05b42e18713;p=gitmo%2FMoose.git

don't reject win32 filenames (Yappo)
---

diff --git a/t/100_bugs/011_DEMOLISH_eats_exceptions.t b/t/100_bugs/011_DEMOLISH_eats_exceptions.t
index 7574db7..31edb46 100644
--- a/t/100_bugs/011_DEMOLISH_eats_exceptions.t
+++ b/t/100_bugs/011_DEMOLISH_eats_exceptions.t
@@ -11,7 +11,7 @@ use Moose::Util::TypeConstraints;
 
 subtype 'FilePath'
     => as 'Str'
-    => where { $_ =~ m#^(/[a-zA-Z0-9_.-]+)+$#
+    => where { $_ =~ m#^(/[a-zA-Z0-9_.-]+)+/?$#
                 || $_ =~ m#^([c-zC-Z]:/[a-zA-Z0-9_.-]+)# };
 {
     package Baz;