X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy.pm;h=d7ed4d6275d0691052c505df64fad6f1d78b6816;hp=fea7d59a6915f800b1b4b77d9039b0c54871f908;hb=5cebce9ecb1a4d1921d1d53acb0d83fc218a2a76;hpb=f873565f301b90012248fabe034b60ed51c78026 diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm index fea7d59..d7ed4d6 100644 --- a/lib/ZOOM/IRSpy.pm +++ b/lib/ZOOM/IRSpy.pm @@ -1,4 +1,4 @@ -# $Id: IRSpy.pm,v 1.11 2006-07-24 17:00:36 mike Exp $ +# $Id: IRSpy.pm,v 1.12 2006-07-25 15:18:03 mike Exp $ package ZOOM::IRSpy; @@ -153,6 +153,8 @@ sub initialise { my $zeerex = _render_record($rs, $i-1, "zeerex"); $target2record{lc($target)} = new ZOOM::IRSpy::Record($target, $zeerex); + push @{ $this->{targets} }, $target + if $this->{allrecords}; } foreach my $target (keys %target2record) {