mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-11 21:51:21 +00:00
Removed indirect object syntax from the modulino portion of pt-fk-error-logger
This commit is contained in:
@@ -1933,7 +1933,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();
|
||||||
|
|
||||||
@@ -1969,7 +1969,7 @@ sub main {
|
|||||||
# ########################################################################
|
# ########################################################################
|
||||||
# Make common modules.
|
# Make common modules.
|
||||||
# ########################################################################
|
# ########################################################################
|
||||||
my $q = new Quoter();
|
my $q = Quoter->new();
|
||||||
my %modules = (
|
my %modules = (
|
||||||
o => $o,
|
o => $o,
|
||||||
dp => $dp,
|
dp => $dp,
|
||||||
@@ -2007,13 +2007,13 @@ sub main {
|
|||||||
# Daemonize only after (potentially) asking for passwords for --ask-pass.
|
# Daemonize only after (potentially) asking for passwords for --ask-pass.
|
||||||
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();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user