X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FDXXml.pm;h=c29620bbb2cf9a239b1fdb7d86e1a3ce3091f676;hp=fe4cb2b8af8efc6affdc47079922e6f56f25e3c5;hb=2d04aeea02a238550f8a7498a826f910e539caf2;hpb=9cc26cc7a73efb7679d3e8e819ba0019307f8607

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=>[]);