[Catalyst-commits] r8186 - in trunk/Config-Any: . lib/Config t

[bricas at dev.catalyst.perl.org]

Author: bricas
Date: 2008-08-06 14:40:03 +0100 (Wed, 06 Aug 2008)
New Revision: 8186

Modified:
   trunk/Config-Any/Changes
   trunk/Config-Any/lib/Config/Any.pm
   trunk/Config-Any/t/54-xml.t
Log:
skip xml failure tests if XML::LibXML < 1.59 is installed, it seems to parse anything you throw at it (Matt S. Trout)

Modified: trunk/Config-Any/Changes
===================================================================
--- trunk/Config-Any/Changes	2008-08-05 20:21:25 UTC (rev 8185)
+++ trunk/Config-Any/Changes	2008-08-06 13:40:03 UTC (rev 8186)
@@ -1,5 +1,9 @@
 Revision history for Config-Any
 
+0.14 XXX
+    - skip xml failure tests if XML::LibXML < 1.59 is installed, it seems
+      to parse anything you throw at it (Matt S. Trout)
+
 0.13 Tue 05 Aug 2008
     - show actual parse error when parse fails (Marcus Ramberg)
     - ensure Config::Tiny parse errors are trapped

Modified: trunk/Config-Any/lib/Config/Any.pm
===================================================================
--- trunk/Config-Any/lib/Config/Any.pm	2008-08-05 20:21:25 UTC (rev 8185)
+++ trunk/Config-Any/lib/Config/Any.pm	2008-08-06 13:40:03 UTC (rev 8186)
@@ -6,7 +6,7 @@
 use Carp;
 use Module::Pluggable::Object ();
 
-our $VERSION = '0.13';
+our $VERSION = '0.14';
 
 =head1 NAME
 

Modified: trunk/Config-Any/t/54-xml.t
===================================================================
--- trunk/Config-Any/t/54-xml.t	2008-08-05 20:21:25 UTC (rev 8185)
+++ trunk/Config-Any/t/54-xml.t	2008-08-06 13:40:03 UTC (rev 8186)
@@ -18,7 +18,11 @@
 }
 
 # test invalid config
-{
+SKIP: {
+    my $broken_libxml = eval { require XML::LibXML; XML::LibXML->VERSION lt '1.59'; };
+    skip 'XML::LibXML < 1.58 has issues', 2 if $broken_libxml;
+
+    local $SIG{__WARN__} = sub {}; # squash warnings from XML::Simple
     my $file = 't/invalid/conf.xml';
     my $config = eval { Config::Any::XML->load( $file ) };