removed Data::TreeDumper as requirement

diff --git a/xml-db/xml-db.pl b/xml-db/xml-db.pl
index 2e04ee4586e09b8431d29cde26ab68575058bb42..cf128067d8dda4ba6d67c31dab80be98db9d13f9 100755 (executable)
--- a/xml-db/xml-db.pl
+++ b/xml-db/xml-db.pl
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 use XML::LibXML;
-use Data::TreeDumper;
+# use Data::TreeDumper;
 use Getopt::Long;
 use Pod::Usage;
 use File::chdir;
@@ -100,7 +100,7 @@ sub Main {
     my $cachefile = "cache/$name.entity";
     lock_store($db, $cachefile);
     print STDERR "Wrote $cachefile\n" if $verbose>0;
-    print STDERR "\n",DumpTree($db,$name),"\n" if $verbose>2;
+#     print STDERR "\n",DumpTree($db,$name),"\n" if $verbose>2;
   }