Fix for 1041391: Debug statement for Chosen hash func prints undef

This commit is contained in:
Brian Fraser
2012-11-01 04:38:18 -03:00
parent 64fe380986
commit ab0e418fff
2 changed files with 4 additions and 4 deletions

View File

@@ -5281,7 +5281,7 @@ sub _get_hash_func {
unshift @funcs, $func;
}
my ($result, $error);
my $error;
foreach my $func ( @funcs ) {
eval {
my $sql = "SELECT $func('test-string')";
@@ -5292,7 +5292,7 @@ sub _get_hash_func {
$error .= qq{$func cannot be used because "$1"\n};
PTDEBUG && _d($func, 'cannot be used because', $1);
}
PTDEBUG && _d('Chosen hash func:', $result);
PTDEBUG && _d('Chosen hash func:', $func);
return $func;
}
die $error || 'No hash functions (CRC32, MD5, etc.) are available';