From: gfx Date: Wed, 9 Jun 2010 09:45:42 +0000 (+0900) Subject: Skip a test that fails on some platforms X-Git-Tag: 0.60~5 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=commitdiff_plain;h=2b36fd6f86fdf36b639f6c3c90025895e7fdae16 Skip a test that fails on some platforms --- diff --git a/t/900_mouse_bugs/006_RT69939.t b/t/900_mouse_bugs/006_RT69939.t index 680dee8..c211a2c 100644 --- a/t/900_mouse_bugs/006_RT69939.t +++ b/t/900_mouse_bugs/006_RT69939.t @@ -1,5 +1,13 @@ #!perl -w +use Test::More; + +BEGIN { + if($^O =~ /bsd/) { + plan skip_all => q{TODO: *bsd might fail on this tests (this test is an workaround to a core bug)}; + } +} + package Foo; use Mouse;