summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org>2020-04-01 16:10:26 +0300
committerSergey Poznyakoff <gray@gnu.org>2020-04-01 16:10:26 +0300
commitb67696484e84bcb13fa9c976effc19ada46ce12c (patch)
tree283466f3e9e1136a68eeb16bb1a7e2b8c6ae6ec2
parent5de45a20199112755eecad1ef23a028c65b48f51 (diff)
downloadacpp-b67696484e84bcb13fa9c976effc19ada46ce12c.tar.gz
acpp-b67696484e84bcb13fa9c976effc19ada46ce12c.tar.bz2
Minor change
-rw-r--r--lib/Apache/Config/Preproc/ifdefine.pm2
-rw-r--r--lib/Apache/Config/Preproc/ifmodule.pm2
-rw-r--r--lib/Apache/Config/Preproc/include.pm2
-rw-r--r--lib/Apache/Config/Preproc/locus.pm2
-rw-r--r--lib/Apache/Config/Preproc/macro.pm2
5 files changed, 5 insertions, 5 deletions
diff --git a/lib/Apache/Config/Preproc/ifdefine.pm b/lib/Apache/Config/Preproc/ifdefine.pm
index 3ca925b..833097d 100644
--- a/lib/Apache/Config/Preproc/ifdefine.pm
+++ b/lib/Apache/Config/Preproc/ifdefine.pm
@@ -8,7 +8,7 @@ our $VERSION = '1.03';
sub new {
my ($class, $conf) = @_;
- my $self = bless $class->SUPER::new($conf), $class;
+ my $self = $class->SUPER::new($conf);
@{$self->{D}}{@_} = (1) x @_;
return $self;
}
diff --git a/lib/Apache/Config/Preproc/ifmodule.pm b/lib/Apache/Config/Preproc/ifmodule.pm
index f96f04b..cd98985 100644
--- a/lib/Apache/Config/Preproc/ifmodule.pm
+++ b/lib/Apache/Config/Preproc/ifmodule.pm
@@ -10,7 +10,7 @@ our $VERSION = '1.03';
sub new {
my $class = shift;
my $conf = shift;
- my $self = bless $class->SUPER::new($conf), $class;
+ my $self = $class->SUPER::new($conf);
local %_ = @_;
my $v;
if ($v = delete $_{preloaded}) {
diff --git a/lib/Apache/Config/Preproc/include.pm b/lib/Apache/Config/Preproc/include.pm
index aa818fb..c023b2e 100644
--- a/lib/Apache/Config/Preproc/include.pm
+++ b/lib/Apache/Config/Preproc/include.pm
@@ -14,7 +14,7 @@ our $VERSION = '1.03';
sub new {
my $class = shift;
my $conf = shift;
- my $self = bless $class->SUPER::new($conf), $class;
+ my $self = $class->SUPER::new($conf);
$self->{context} = [];
local %_ = @_;
$self->{server_root} = delete $_{server_root};
diff --git a/lib/Apache/Config/Preproc/locus.pm b/lib/Apache/Config/Preproc/locus.pm
index 8c22613..3a4122d 100644
--- a/lib/Apache/Config/Preproc/locus.pm
+++ b/lib/Apache/Config/Preproc/locus.pm
@@ -8,7 +8,7 @@ our $VERSION = '1.03';
sub new {
my $class = shift;
- my $self = bless $class->SUPER::new(@_), $class;
+ my $self = $class->SUPER::new(@_);
$self->{filename} = $self->conf->filename;
$self->{line} = 0;
$self->{context} = [];
diff --git a/lib/Apache/Config/Preproc/macro.pm b/lib/Apache/Config/Preproc/macro.pm
index 43714a8..0efc3d6 100644
--- a/lib/Apache/Config/Preproc/macro.pm
+++ b/lib/Apache/Config/Preproc/macro.pm
@@ -10,7 +10,7 @@ our $VERSION = '1.03';
sub new {
my $class = shift;
my $conf = shift;
- my $self = bless $class->SUPER::new($conf), $class;
+ my $self = $class->SUPER::new($conf);
$self->{keep} = {};
croak "bad number of arguments: @_" if @_ % 2;
local %_ = @_;

Return to:

Send suggestions and report system problems to the System administrator.