percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-11 13:40:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

Removed indirect object syntax from the modulino portion of pt-config-diff

Browse Source
This commit is contained in:
Brian Fraser
2011-12-23 12:06:14 -03:00
parent 8c2d09b555
commit f5ff076c7c
1 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
bin/pt-config-diff
View File

@@ -2749,7 +2749,7 @@ sub main {
# ######################################################################## # ########################################################################
# Get configuration information. # Get configuration information.
# ######################################################################## # ########################################################################
my $o = new OptionParser(); my $o = OptionParser->new();
$o->get_specs(); $o->get_specs();
$o->get_opts(); $o->get_opts();
@@ -2767,8 +2767,8 @@ sub main {
# ######################################################################### # #########################################################################
# Make common modules. # Make common modules.
# ######################################################################### # #########################################################################
my $trp = new TextResultSetParser(); my $trp = TextResultSetParser->new();
my $config_cmp = new MySQLConfigComparer( my $config_cmp = MySQLConfigComparer->new(
ignore_variables => $o->get('ignore-variables'), ignore_variables => $o->get('ignore-variables'),
); );
my %common_modules = ( my %common_modules = (
@@ -2788,7 +2788,7 @@ sub main {
foreach my $config_src ( @ARGV ) { foreach my $config_src ( @ARGV ) {
if ( -f $config_src ) { if ( -f $config_src ) {
MKDEBUG && _d('Config source', $config_src, 'is a file'); MKDEBUG && _d('Config source', $config_src, 'is a file');
push @configs, new MySQLConfig( push @configs, MySQLConfig->new(
file => $config_src, file => $config_src,
%common_modules, %common_modules,
); );
@@ -2801,7 +2801,7 @@ sub main {
$dp->fill_in_dsn($dbh, $dsn); $dp->fill_in_dsn($dbh, $dsn);
$last_dsn = $dsn; $last_dsn = $dsn;
push @configs, new MySQLConfig( push @configs, MySQLConfig->new(
dbh => $dbh, dbh => $dbh,
%common_modules, %common_modules,
); );
@@ -2816,13 +2816,13 @@ sub main {
# ######################################################################## # ########################################################################
my $daemon; my $daemon;
if ( $o->get('daemonize') ) { if ( $o->get('daemonize') ) {
$daemon = new Daemon(o=>$o); $daemon = Daemon->new(o=>$o);
$daemon->daemonize(); $daemon->daemonize();
MKDEBUG && _d('I am a daemon now'); MKDEBUG && _d('I am a daemon now');
} }
elsif ( $o->get('pid') ) { elsif ( $o->get('pid') ) {
# We're not daemoninzing, it just handles PID stuff. # We're not daemoninzing, it just handles PID stuff.
$daemon = new Daemon(o=>$o); $daemon = Daemon->new(o=>$o);
$daemon->make_PID_file(); $daemon->make_PID_file();
} }
@@ -2832,7 +2832,7 @@ sub main {
my $report; my $report;
my $truncate_callback; my $truncate_callback;
if ( $o->get('report') ) { if ( $o->get('report') ) {
$report = new ReportFormatter( $report = ReportFormatter->new(
line_prefix => '', line_prefix => '',
line_width => $o->get('report-width'), line_width => $o->get('report-width'),
); );