mirror of
https://github.com/percona/percona-toolkit.git
synced 2026-02-28 02:07:54 +08:00
PT-1554 Test a fix for query-digest checksums
This commit is contained in:
@@ -2679,7 +2679,7 @@ sub any_unix_timestamp {
|
||||
|
||||
sub make_checksum {
|
||||
my ( $val ) = @_;
|
||||
my $checksum = uc substr(md5_hex($val), -32);
|
||||
my $checksum = uc substr(md5_hex($val), -16);
|
||||
warn ($checksum, ' checksum for ', $val);
|
||||
PTDEBUG && _d($checksum, 'checksum for', $val);
|
||||
return $checksum;
|
||||
|
||||
Reference in New Issue
Block a user