X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FRecord.pm;h=165f62e525c6ed7304515a7b596c57c32e6ec253;hp=85d465327d104a251ca2a5e29d52a36dda7d2401;hb=4172edcd817f7b978a772fe2b8365e4f1ee8f3bb;hpb=087d286130ff54c827c1d490ee9be55286476882 diff --git a/lib/ZOOM/IRSpy/Record.pm b/lib/ZOOM/IRSpy/Record.pm index 85d4653..165f62e 100644 --- a/lib/ZOOM/IRSpy/Record.pm +++ b/lib/ZOOM/IRSpy/Record.pm @@ -1,4 +1,4 @@ -# $Id: Record.pm,v 1.9 2006-07-24 17:01:46 mike Exp $ +# $Id: Record.pm,v 1.10 2006-07-25 16:53:28 mike Exp $ package ZOOM::IRSpy::Record; @@ -63,7 +63,7 @@ sub append_entry { my $this = shift(); my($xpath, $frag) = @_; - print STDERR "this=$this, xpath='$xpath', frag='$frag'\n"; + #print STDERR "this=$this, xpath='$xpath', frag='$frag'\n"; my $root = $this->{zeerex}; # XML::LibXML::Element ISA XML::LibXML::Node my $xc = XML::LibXML::XPathContext->new($root); $xc->registerNs(zeerex => "http://explain.z3950.org/dtd/2.0/");