[Catalyst-commits] r6667 - trunk/Catalyst-Engine-Wx/t

[eriam at dev.catalyst.perl.org]

Author: eriam
Date: 2007-08-15 20:10:43 +0100 (Wed, 15 Aug 2007)
New Revision: 6667

Modified:
   trunk/Catalyst-Engine-Wx/t/3_wx.t
   trunk/Catalyst-Engine-Wx/t/4_forward.t
Log:
Added skip to tests

Modified: trunk/Catalyst-Engine-Wx/t/3_wx.t
===================================================================
--- trunk/Catalyst-Engine-Wx/t/3_wx.t	2007-08-15 18:43:29 UTC (rev 6666)
+++ trunk/Catalyst-Engine-Wx/t/3_wx.t	2007-08-15 19:10:43 UTC (rev 6667)
@@ -1,6 +1,13 @@
+use strict;
+use Test::More;
 
-use Test::More tests => 8;
+BEGIN {
+    eval { require Wx; };
+    plan skip_all => 'Wx required for this module' if $@;
+}
 
+plan tests => 8;
+
 BEGIN { 
     use lib "t/lib/";
 

Modified: trunk/Catalyst-Engine-Wx/t/4_forward.t
===================================================================
--- trunk/Catalyst-Engine-Wx/t/4_forward.t	2007-08-15 18:43:29 UTC (rev 6666)
+++ trunk/Catalyst-Engine-Wx/t/4_forward.t	2007-08-15 19:10:43 UTC (rev 6667)
@@ -1,6 +1,14 @@
+use strict;
+use Test::More;
 
-use Test::More tests => 2;
+BEGIN {
+    eval { require Wx; };
+    plan skip_all => 'Wx required for this test' if $@;
+}
 
+
+plan tests => 2;
+
 BEGIN { 
     use lib "./t/lib";