summaryrefslogtreecommitdiffabout
authorSergey Poznyakoff <gray@gnu.org>2020-04-01 13:16:46 (GMT)
committer Sergey Poznyakoff <gray@gnu.org>2020-04-01 13:16:46 (GMT)
commit0b57289838dd536d6f98696e16a06c3663535b8e (patch) (side-by-side diff)
treefb19a743dfeeb5f12db4fd6e37a6dc1bc53baffb
parentbb9f4b1be695f5543ddf30b30ad446b5b7d214c5 (diff)
downloadmangemanche-0b57289838dd536d6f98696e16a06c3663535b8e.tar.gz
mangemanche-0b57289838dd536d6f98696e16a06c3663535b8e.tar.bz2
Minor change
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--lib/App/Mangemanche/Command/dbload.pm2
-rw-r--r--lib/App/Mangemanche/Command/nagios.pm6
-rw-r--r--lib/LWP/Ping903.pm2
3 files changed, 5 insertions, 5 deletions
diff --git a/lib/App/Mangemanche/Command/dbload.pm b/lib/App/Mangemanche/Command/dbload.pm
index 06219a8..78d2501 100644
--- a/lib/App/Mangemanche/Command/dbload.pm
+++ b/lib/App/Mangemanche/Command/dbload.pm
@@ -10,7 +10,7 @@ use File::Spec;
sub new {
my ($class, $com, $agent) = @_;
- my $self = bless $class->SUPER::new($com, $agent,
+ my $self = $class->SUPER::new($com, $agent,
'D|driver=s' => 'driver',
'd|database=s' => sub {
my $self = shift;
diff --git a/lib/App/Mangemanche/Command/nagios.pm b/lib/App/Mangemanche/Command/nagios.pm
index 690f33a..016ba6d 100644
--- a/lib/App/Mangemanche/Command/nagios.pm
+++ b/lib/App/Mangemanche/Command/nagios.pm
@@ -10,9 +10,9 @@ use Nagios::Config;
sub new {
my ($class, $com, $agent) = @_;
- bless $class->SUPER::new($com, $agent,
- 'progname|p=s@' => 'prognames',
- 'config|c=s' => 'nagiosconf');
+ $class->SUPER::new($com, $agent,
+ 'progname|p=s@' => 'prognames',
+ 'config|c=s' => 'nagiosconf');
}
sub run {
diff --git a/lib/LWP/Ping903.pm b/lib/LWP/Ping903.pm
index 8fc398e..5421db0 100644
--- a/lib/LWP/Ping903.pm
+++ b/lib/LWP/Ping903.pm
@@ -10,7 +10,7 @@ my $VERSION = '0.3';
sub new {
my $class = shift;
- my $self = bless $class->SUPER::new(@_), $class;
+ my $self = $class->SUPER::new(@_);
$self->agent("$class/$VERSION");
return $self;
}

Return to:

Send suggestions and report system problems to the System administrator.