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:
parent
6a26bcf517
commit
ed6131ccbd
|
|
@ -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 );
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue