X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fc3_mro.t;h=57c3bdb7c2c9ebd05a810cf2922a3146b94a9089;hb=5baa3bbcb8bea403665bceaa82f819905f0b501f;hp=5d6b306f0228d5059343266e8b2317cdf8a2e75f;hpb=b46641749ef50456b64e0da3544c7c96ea572289;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/c3_mro.t b/t/c3_mro.t
index 5d6b306..57c3bdb 100644
--- a/t/c3_mro.t
+++ b/t/c3_mro.t
@@ -11,6 +11,10 @@ plan skip_all => "This test requires Class::C3" if $@;
 # Get a list of all Catalyst:: packages in blib via M::P::O
 my @cat_mods;
 {
+  # problem with @INC on win32, see:
+  # http://rt.cpan.org/Ticket/Display.html?id=26452
+  if ($^O eq 'MSWin32') { require Win32; Win32::GetCwd(); }
+
   local @INC = grep {/blib/} @INC;
   @cat_mods = (
     'Catalyst', 
@@ -31,6 +35,6 @@ plan tests => scalar @cat_mods;
 foreach my $cat_mod (@cat_mods) {
   eval " require $cat_mod ";
   eval { Class::C3::calculateMRO($cat_mod) };
-  ok(!$@, "calculateMRO for $cat_mod");
+  ok(!$@, "calculateMRO for $cat_mod: $@");
 }