From 520e2532d2767b2db02937c431e295d4a0c8e53f Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Mon, 24 Jul 2006 17:01:46 +0000 Subject: [PATCH 1/1] Remove commented-out logging on each record modification. Downgrade ###-comment to ## --- lib/ZOOM/IRSpy/Record.pm | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/lib/ZOOM/IRSpy/Record.pm b/lib/ZOOM/IRSpy/Record.pm index 2f67dc1..85d4653 100644 --- a/lib/ZOOM/IRSpy/Record.pm +++ b/lib/ZOOM/IRSpy/Record.pm @@ -1,4 +1,4 @@ -# $Id: Record.pm,v 1.8 2006-07-24 16:44:00 mike Exp $ +# $Id: Record.pm,v 1.9 2006-07-24 17:01:46 mike Exp $ package ZOOM::IRSpy::Record; @@ -86,10 +86,7 @@ sub append_entry { scalar(@nodes), " matches for '$xpath': using first") if @nodes > 1; - my $node = $nodes[0]; - # $node ISA XML::LibXML::ElementXML::LibXML::Element - $this->_half_decent_appendWellBalancedChunk($node, $frag); - #print STDERR "POST: zeerex='$root' = \n", $root->toString(), "\n"; + $this->_half_decent_appendWellBalancedChunk($nodes[0], $frag); } @@ -140,7 +137,7 @@ sub _half_decent_appendWellBalancedChunk { die "mismatched XML start/end <$open>...<$close>" if $close ne $tag; print STDERR "tag='$tag', attrs=[$attrs], content='$content'\n"; - die "### no code yet to make DOM node"; + die "## no code yet to make DOM node"; } -- 1.7.10.4