Removed indirect object syntax from the modulino portion of pt-fk-error-logger

This commit is contained in:
Brian Fraser
2011-12-23 17:31:38 -03:00
parent 277f487fef
commit 264fdbd271

View File

@@ -1933,7 +1933,7 @@ sub main {
# ########################################################################
# Get configuration information.
# ########################################################################
my $o = new OptionParser();
my $o = OptionParser->new();
$o->get_specs();
$o->get_opts();
@@ -1969,7 +1969,7 @@ sub main {
# ########################################################################
# Make common modules.
# ########################################################################
my $q = new Quoter();
my $q = Quoter->new();
my %modules = (
o => $o,
dp => $dp,
@@ -2007,13 +2007,13 @@ sub main {
# Daemonize only after (potentially) asking for passwords for --ask-pass.
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();
}