X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy.pm;h=d7ed4d6275d0691052c505df64fad6f1d78b6816;hb=88b66b977588fbc8fe4b7562a72136662d7aae15;hp=fea7d59a6915f800b1b4b77d9039b0c54871f908;hpb=971bddaa5fa6814a597906994be314ec396a1888;p=irspy-moved-to-github.git 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) {