Commits

Shlomi Fish committed ae82a3d

t/46err_column.t : add a skip for a test for CentOS/RHEL 4.

- https://rt.cpan.org/Ticket/Display.html?id=69070
- old version of libxml2 .

  • Participants
  • Parent commits 1a1a978

Comments (0)

Files changed (2)

 Revision history for Perl extension XML::LibXML
 
+    - t/46err_column.t : add a skip for a test for CentOS/RHEL 4:
+        - https://rt.cpan.org/Ticket/Display.html?id=69070
+        - old version of libxml2 .
+
 1.78            Wed Jul  6 20:23:58 IDT 2011
     - Change t/02parse.t to test for the localized error message:
         - https://rt.cpan.org/Public/Bug/Display.html?id=69248

File t/46err_column.t

     )
 };
 
-# TEST
-is ($@->column(), 203, "Column is OK.");
+SKIP:
+{
+    my $err = $@;
+    # This is a fix for:
+    # https://rt.cpan.org/Ticket/Display.html?id=69070
+    # << t/46err_column.t is broken on centos/RHEL 4 >>
+
+    # On this system, libxml is as follows:
+    # libxml2-devel-2.6.16-12.8
+
+    if (! ref($err))
+    {
+        skip('parse_string returned a string - not an XML::LibXML::Error object - probably an old libxml2',
+            1
+        );
+    }
+    # TEST
+    is ($err->column(), 203, "Column is OK.");
+}