percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-10 13:11:32 +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.
# ########################################################################
my $o = new OptionParser();
my $o = OptionParser->new();
$o->get_specs();
$o->get_opts();
@@ -2767,8 +2767,8 @@ sub main {
# #########################################################################
# Make common modules.
# #########################################################################
my $trp = new TextResultSetParser();
my $config_cmp = new MySQLConfigComparer(
my $trp = TextResultSetParser->new();
my $config_cmp = MySQLConfigComparer->new(
ignore_variables => $o->get('ignore-variables'),
);
my %common_modules = (
@@ -2788,7 +2788,7 @@ sub main {
foreach my $config_src ( @ARGV ) {
if ( -f $config_src ) {
MKDEBUG && _d('Config source', $config_src, 'is a file');
push @configs, new MySQLConfig(
push @configs, MySQLConfig->new(
file => $config_src,
%common_modules,
);
@@ -2801,7 +2801,7 @@ sub main {
$dp->fill_in_dsn($dbh, $dsn);
$last_dsn = $dsn;
push @configs, new MySQLConfig(
push @configs, MySQLConfig->new(
dbh => $dbh,
%common_modules,
);
@@ -2816,13 +2816,13 @@ sub main {
# ########################################################################
my $daemon;
if ( $o->get('daemonize') ) {
$daemon = new Daemon(o=>$o);
$daemon = Daemon->new(o=>$o);
$daemon->daemonize();
MKDEBUG && _d('I am a daemon now');
}
elsif ( $o->get('pid') ) {
# We're not daemoninzing, it just handles PID stuff.
$daemon = new Daemon(o=>$o);
$daemon = Daemon->new(o=>$o);
$daemon->make_PID_file();
}
@@ -2832,7 +2832,7 @@ sub main {
my $report;
my $truncate_callback;
if ( $o->get('report') ) {
$report = new ReportFormatter(
$report = ReportFormatter->new(
line_prefix => '',
line_width => $o->get('report-width'),
);