← Back to branch summary

~percona-toolkit-dev/percona-toolkit/1.0

« back to all changes in this revision

Viewing changes to lib/TableSyncGroupBy.pm

  • Committer: Daniel Nichter
  • Date: 2011-12-22 20:11:46 UTC
  • Revision ID: daniel@percona.com-20111222201146-1xq21ewhzeanlh1t
https://launchpad.net/bugs/903513
Change MKDEBUG to PTDEBUG everywhere.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/TableSyncGroupBy.pm
28
28
use strict;
29
29
use warnings FATAL => 'all';
30
30
use English qw(-no_match_vars);
31
 
use constant MKDEBUG => $ENV{MKDEBUG} || 0;
 
31
use constant PTDEBUG => $ENV{PTDEBUG} || 0;
32
32
 
33
33
sub new {
34
34
   my ( $class, %args ) = @_;
63
63
      # Prepend more _ until not a column.
64
64
      $self->{count_col} = "_$self->{count_col}";
65
65
   }
66
 
   MKDEBUG && _d('COUNT column will be named', $self->{count_col});
 
66
   PTDEBUG && _d('COUNT column will be named', $self->{count_col});
67
67
 
68
68
   $self->{done} = 0;
69
69