From: Mike Taylor Date: Wed, 11 Oct 2006 16:36:03 +0000 (+0000) Subject: Remove debugging print X-Git-Tag: CPAN-v1.02~54^2~938 X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=5d760316616e1bb28acb3dbad204d59c3374fdc1;ds=sidebyside Remove debugging print --- diff --git a/lib/ZOOM/IRSpy/Node.pm b/lib/ZOOM/IRSpy/Node.pm index 711d76b..74b5154 100644 --- a/lib/ZOOM/IRSpy/Node.pm +++ b/lib/ZOOM/IRSpy/Node.pm @@ -1,4 +1,4 @@ -# $Id: Node.pm,v 1.4 2006-10-11 16:35:43 mike Exp $ +# $Id: Node.pm,v 1.5 2006-10-11 16:36:03 mike Exp $ package ZOOM::IRSpy::Node; @@ -160,7 +160,6 @@ sub select { if ($address eq "") { return $this; } elsif (my($head, $tail) = $address =~ /(.*?):(.*)/) { - print "*** testing head='$head' tail='$tail'\n"; return $sub[$head]->select($tail); } else { return $sub[$address];