--- nfo/perl/libs/Data/Storage/Handler/XML.pm	2003/06/06 03:58:13	1.4
+++ nfo/perl/libs/Data/Storage/Handler/XML.pm	2003/12/05 04:52:40	1.5
@@ -1,7 +1,10 @@
 ## ------------------------------------------------------------------------
-##  $Id: XML.pm,v 1.4 2003/06/06 03:58:13 joko Exp $
+##  $Id: XML.pm,v 1.5 2003/12/05 04:52:40 joko Exp $
 ## ------------------------------------------------------------------------
 ##  $Log: XML.pm,v $
+##  Revision 1.5  2003/12/05 04:52:40  joko
+##  + minor update: changed some loglevel to debug
+##
 ##  Revision 1.4  2003/06/06 03:58:13  joko
 ##  minor updates to logging
 ##
@@ -28,6 +31,7 @@
 );
 
 
+# TODO: Load them on demand!
 use Data::Dumper;
 #use Data::Storage::Handler::File::Basic qw( s2f a2f f2s );
 use XML::Simple;
@@ -66,7 +70,7 @@
   #print "file: $file", "\n";
   #print "xpq: $xpq", "\n";
 
-  $logger->info( __PACKAGE__ . "->sendQuery - File: $file, xpq: $xpq");
+  $logger->debug( __PACKAGE__ . "->sendQuery - File: $file, xpq: $xpq");
 
   # filter nodes by xpath-query
     my $xp = XML::XPath->new( filename => $file );