From 2d04aeea02a238550f8a7498a826f910e539caf2 Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 15 Jan 2006 19:56:09 +0000 Subject: [PATCH] use XML::Parser (it should be adequate for the little things we are doing). --- perl/DXXml.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/perl/DXXml.pm b/perl/DXXml.pm index fe4cb2b8..c29620bb 100644 --- a/perl/DXXml.pm +++ b/perl/DXXml.pm @@ -42,13 +42,12 @@ sub init return unless $main::do_xml; eval { require XML::Simple }; - eval { require XML::SAX } unless $@; - eval { require XML::SAX::Expat } unless $@; + eval { require XML::Parser } unless $@; if ($@) { LogDbg('err', "do_xml was set to 1 and the XML routines failed to load ($@)"); $main::do_xml = 0; } else { - $XML::Simple::PREFERRED_PARSER = 'XML::SAX::Expat'; + $XML::Simple::PREFERRED_PARSER = 'XML::Parser'; import XML::Simple; $DXProt::handle_xml = 1; $xs = new XML::Simple(Cache=>[]); -- 2.43.0