remove all traces of Aranea.

[spider.git] / perl / DXXml.pm

diff --git a/perl/DXXml.pm b/perl/DXXml.pm
index 16f40eaa78678fa0c1e0d21c882d20b5dc3b3e77..c6c8ee6922835d3c160789544878f30c1be61c0d 100644 (file)
--- a/perl/DXXml.pm
+++ b/perl/DXXml.pm
@@ -23,6 +23,8 @@ $xs = undef;                                                  # the XML::Simple parser instance
 
 sub init
 {
+       return unless $main::do_xml;
+       
        eval { require XML::Simple; };
        unless ($@) {
                import XML::Simple;