From 2476b32c2fb9f206db264d6c0f514e28a71cd642 Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Fri, 6 Oct 2006 16:52:50 +0000 Subject: [PATCH] Use the Node class's subnodes() method, was subtests() --- lib/ZOOM/IRSpy.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm index 103889b..6688393 100644 --- a/lib/ZOOM/IRSpy.pm +++ b/lib/ZOOM/IRSpy.pm @@ -1,4 +1,4 @@ -# $Id: IRSpy.pm,v 1.22 2006-10-06 11:33:07 mike Exp $ +# $Id: IRSpy.pm,v 1.23 2006-10-06 16:52:50 mike Exp $ package ZOOM::IRSpy; @@ -414,13 +414,13 @@ sub _gather_tests { } $this->log("irspy", "adding test '$tname'"); - my @subtests; + my @subnodes; foreach my $subtname ("ZOOM::IRSpy::Test::$tname"->subtests($this)) { my $subtest = $this->_gather_tests($subtname, @ancestors, $tname); - push @subtests, $subtest if defined $subtest; + push @subnodes, $subtest if defined $subtest; } - return new ZOOM::IRSpy::Node($tname, @subtests); + return new ZOOM::IRSpy::Node($tname, @subnodes); } -- 1.7.10.4