percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-25 05:44:59 +00:00
Code Issues Packages Projects Releases Wiki Activity

Replace the last instances of MKDEBUG

Browse Source
This commit is contained in:
Brian Fraser fraserb@gmail.com
2012-06-05 12:28:36 -03:00
parent 6b93d51e43
commit 345a21a82e
22 changed files with 278 additions and 278 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
t/pt-query-digest/samples/filter-add-ymdh-attribs.txt
View File

@@ -5,7 +5,7 @@ if ( $event->{ts} ) {
($year, $month, $day, $hour)
= $event->{ts} =~ /^(\d\d)(\d\d)(\d\d)\s+(\d\d):/;
}
MKDEBUG && _d('ymdh:', $year, $month, $day, $hour);
PTDEBUG && _d('ymdh:', $year, $month, $day, $hour);
$event->{year} = $year || 0;
$event->{month} = $month || 0;
$event->{day} = $day || 0;
@@ -16,7 +16,7 @@ $event->{hour} = $hour || 24; # 0 is a valid hour
my $ok = 1;
foreach my $filter ( qw(YEAR MONTH HOUR DAY) ) {
if ( $ENV{$filter} && $event->{lc $filter} != $ENV{$filter} ) {
MKDEBUG && _d('Event does not match', $filter, '=', $ENV{$filter});
PTDEBUG && _d('Event does not match', $filter, '=', $ENV{$filter});
$ok = 0;
last;
}