diff options
Diffstat (limited to 'perllib')
| -rw-r--r-- | perllib/phash.ph | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/phash.ph b/perllib/phash.ph index 5bc2744a..936978a5 100644 --- a/perllib/phash.ph +++ b/perllib/phash.ph @@ -161,7 +161,7 @@ sub gen_perfect_hash($) { for ($j = 0; $j < $maxj; $j++) { $sv = $random_sv_vectors[$j]; @hashinfo = gen_hash_n($n, $sv, $href, $run++); - return @hashinfo if (defined(@hashinfo)); + return @hashinfo if (@hashinfo); } $n <<= 1; } |