From modperl-cvs-return-4001-apmail-perl-modperl-cvs-archive=perl.apache.org@perl.apache.org Wed Dec 17 22:27:35 2003 Return-Path: Delivered-To: apmail-perl-modperl-cvs-archive@www.apache.org Received: (qmail 71692 invoked from network); 17 Dec 2003 22:27:35 -0000 Received: from daedalus.apache.org (HELO mail.apache.org) (208.185.179.12) by minotaur-2.apache.org with SMTP; 17 Dec 2003 22:27:35 -0000 Received: (qmail 80559 invoked by uid 500); 17 Dec 2003 22:27:22 -0000 Delivered-To: apmail-perl-modperl-cvs-archive@perl.apache.org Received: (qmail 80540 invoked by uid 500); 17 Dec 2003 22:27:22 -0000 Mailing-List: contact modperl-cvs-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Reply-To: dev@perl.apache.org Delivered-To: mailing list modperl-cvs@perl.apache.org Received: (qmail 80502 invoked by uid 500); 17 Dec 2003 22:27:21 -0000 Delivered-To: apmail-modperl-2.0-cvs@apache.org Date: 17 Dec 2003 22:27:34 -0000 Message-ID: <20031217222734.71688.qmail@minotaur.apache.org> From: stas@apache.org To: modperl-2.0-cvs@apache.org Subject: cvs commit: modperl-2.0/lib/Apache Build.pm X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N stas 2003/12/17 14:27:33 Modified: lib/Apache Build.pm Log: add a warning "noedit" header to the autogenerated Apache2.pm Revision Changes Path 1.154 +2 -1 modperl-2.0/lib/Apache/Build.pm Index: Build.pm =================================================================== RCS file: /home/cvs/modperl-2.0/lib/Apache/Build.pm,v retrieving revision 1.153 retrieving revision 1.154 diff -u -u -r1.153 -r1.154 --- Build.pm 16 Dec 2003 02:39:00 -0000 1.153 +++ Build.pm 17 Dec 2003 22:27:33 -0000 1.154 @@ -1618,7 +1618,8 @@ } EOF - my $content = join "\n\n", 'package Apache2;', $fixup, "1;"; + my $content = join "\n\n", noedit_warning_hash(), + 'package Apache2;', $fixup, "1;"; my $file = catfile qw(lib Apache2.pm); open my $fh, '>', $file or die "Can't open $file: $!"; print $fh $content;