From: Mike Taylor Date: Tue, 21 Nov 2006 11:48:01 +0000 (+0000) Subject: More accurate debugging output. X-Git-Tag: CPAN-v1.02~54^2~707 X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=3d4502ccfb264eb85f4dc9c895becc6018b3b520 More accurate debugging output. --- diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm index 7144720..ea292c9 100644 --- a/lib/ZOOM/IRSpy.pm +++ b/lib/ZOOM/IRSpy.pm @@ -1,4 +1,4 @@ -# $Id: IRSpy.pm,v 1.50 2006-11-20 15:06:46 mike Exp $ +# $Id: IRSpy.pm,v 1.51 2006-11-21 11:48:01 mike Exp $ package ZOOM::IRSpy; @@ -565,8 +565,8 @@ sub _last_sibling_test { my $maybe = $this->_next_sibling_test($address); last if !defined $maybe; $nskipped++; - $this->log("irspy", "skipping $nskipped tests to '$address'"); $address = $maybe; + $this->log("irspy", "skipping $nskipped tests to '$address'"); } return ($address, $nskipped);