← Back to branch summary

~percona-toolkit-dev/percona-toolkit/pt-osc-resume

« back to all changes in this revision

Viewing changes to bin/pt-online-schema-change

  • Committer: Daniel Nichter
  • Date: 2013-02-11 15:48:47 UTC
  • Revision ID: daniel@percona.com-20130211154847-vnh4f1g8b0266g88
Fix custom --max-load.

Show diffs side-by-side

added added

removed removed

Lines of Context:
bin/pt-online-schema-change
8038
8038
         };
8039
8039
      }
8040
8040
 
8041
 
      eval {
8042
 
         $sys_load = new MySQLStatusWaiter(
8043
 
            max_spec      => $o->get('max-load'),
8044
 
            critical_spec => $o->get('critical-load'),
8045
 
            get_status    => $get_status,
8046
 
            oktorun       => sub { return $oktorun },
8047
 
            sleep         => $sleep,
8048
 
         );
8049
 
      };
8050
 
      if ( $EVAL_ERROR ) {
8051
 
         chomp $EVAL_ERROR;
8052
 
         die "Error checking --max-load or --critial-load: $EVAL_ERROR.  "
8053
 
            . "Check that the variables specified for --max-load and "
8054
 
            . "--critical-load are spelled correctly and exist in "
8055
 
            . "SHOW GLOBAL STATUS.  Current values for these options are:\n"
8056
 
            . "  --max-load " . (join(',', @{$o->get('max-load')})) . "\n"
8057
 
            . "  --critial-load "  . (join(',', @{$o->get('critical-load')}))
8058
 
            . "\n";
8059
 
      }
8060
 
      
8061
8041
      if ( $o->get('progress') ) {
8062
8042
         $replica_lag_pr = new Progress(
8063
8043
            jobsize => scalar @$slaves,