quell warnings for SimpleSearch under 'use warnings'

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Galen Charlton 2008-02-07 00:11:35 -06:00 committed by Joshua Ferraro
parent 6a26bcf517
commit ed6131ccbd
1 changed files with 2 additions and 1 deletions

View File

@ -255,7 +255,7 @@ sub SimpleSearch {
return ( $error, undef );
}
}
my $hits;
my $hits = 0;
my $ev;
while ( ( my $i = ZOOM::event( \@zconns ) ) != 0 ) {
$ev = $zconns[ $i - 1 ]->last_event();
@ -268,6 +268,7 @@ sub SimpleSearch {
push @results, $record;
}
}
$hits = 0;
}
return ( undef, \@results );
}