From a9423bb8536070e14f85fe9cee6d1dc84d7a7874 Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Fri, 30 Mar 2018 09:42:46 +0200
Subject: [PATCH] handle set_document_locator event (#3)

---
 t/01_basic.t | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/t/01_basic.t b/t/01_basic.t
index 546014c..99c2bbc 100644
--- a/t/01_basic.t
+++ b/t/01_basic.t
@@ -3,8 +3,14 @@ use strict;
 our $AUTOLOAD;
 use Data::Dumper;
 use Test::More;
+use XML::LibXML;
 
 my @EVENTS = (
+    ($XML::LibXML::VERSION >= 2.0129 ?
+    {
+        Event => 'set_document_locator'
+    }
+    : ()),
     {
         Event => 'start_document'
     },
@@ -108,9 +114,11 @@ sub AUTOLOAD {
 
 package main;
 use strict;
-use Test::More( tests => 23 );
+use Test::More;
 use XML::SAX;
 
+plan tests => $XML::LibXML::VERSION >= 2.0129 ? 25 : 23;
+
 XML::SAX->add_parser( q{XML::LibXML::SAX::ChunkParser} );
 
 {
@@ -140,4 +148,4 @@ XML::SAX->add_parser( q{XML::LibXML::SAX::ChunkParser} );
         diag("parsing chunk '$chunk'");
         $parser->parse_chunk($chunk);
     }
-}
\ No newline at end of file
+}