- Remove use of $] which is deprecated in perl and gone in perl 5.12

This is already being discussed at dev@httpd and will be committed upstream

Reported by:    brad clawsie <clawsie@fastmail.fm> (on apache@ list)
With Hat:       apache@
This commit is contained in:
Philip M. Gollucci 2010-05-13 00:59:32 +00:00
parent 7abc65f67c
commit 6aee801e30
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=254238
2 changed files with 13 additions and 5 deletions

View File

@ -9,7 +9,7 @@
PORTNAME= apache
PORTVERSION= 2.2.15
PORTREVISION= 4
PORTREVISION= 5
CATEGORIES= www
MASTER_SITES= ${MASTER_SITE_APACHE_HTTPD}
DISTNAME= httpd-${PORTVERSION}

View File

@ -1,6 +1,14 @@
--- ./support/apxs.in.orig 2006-07-11 23:38:44.000000000 -0400
+++ ./support/apxs.in 2010-05-06 19:37:54.268730293 -0400
@@ -547,7 +547,10 @@
+++ ./support/apxs.in 2010-05-12 20:57:31.242745632 -0400
@@ -83,7 +83,6 @@
my ($argumentative, @ARGV) = @_;
my $errs = 0;
local $_;
- local $[ = 0;
my @args = split / */, $argumentative;
while (@ARGV && ($_ = $ARGV[0]) =~ /^-(.)(.*)/) {
@@ -547,7 +546,10 @@
$c = '#' if ($opt_A);
foreach $lmd (@lmd) {
my $what = $opt_A ? "preparing" : "activating";
@ -12,7 +20,7 @@
# check for open <containers>, so that the new LoadModule
# directive always appears *outside* of an <container>.
@@ -610,7 +613,13 @@
@@ -610,7 +612,13 @@
}
} else {
# replace already existing LoadModule line
@ -27,7 +35,7 @@
}
$lmd =~ m|LoadModule\s+(.+?)_module.*|;
notice("[$what module `$1' in $CFG_SYSCONFDIR/$CFG_TARGET.conf]");
@@ -619,8 +628,7 @@
@@ -619,8 +627,7 @@
if (open(FP, ">$CFG_SYSCONFDIR/$CFG_TARGET.conf.new")) {
print FP $content;
close(FP);