Return-Path: Delivered-To: apmail-apache-cvs-archive@apache.org Received: (qmail 80160 invoked by uid 500); 16 Mar 2001 04:18:41 -0000 Mailing-List: contact apache-cvs-help@apache.org; run by ezmlm Precedence: bulk Reply-To: new-httpd@apache.org list-help: list-unsubscribe: list-post: Delivered-To: mailing list apache-cvs@apache.org Received: (qmail 80149 invoked by uid 500); 16 Mar 2001 04:18:41 -0000 Delivered-To: apmail-httpd-2.0-cvs@apache.org Date: 16 Mar 2001 04:18:41 -0000 Message-ID: <20010316041841.80145.qmail@apache.org> From: wrowe@apache.org To: httpd-2.0-cvs@apache.org Subject: cvs commit: httpd-2.0 Makefile.win wrowe 01/03/15 20:18:41 Modified: . Makefile.win Log: Fix dbmmanage.pl generation for Win32 Revision Changes Path 1.55 +5 -4 httpd-2.0/Makefile.win Index: Makefile.win =================================================================== RCS file: /home/cvs/httpd-2.0/Makefile.win,v retrieving revision 1.54 retrieving revision 1.55 diff -u -r1.54 -r1.55 --- Makefile.win 2001/03/08 16:11:17 1.54 +++ Makefile.win 2001/03/16 04:18:41 1.55 @@ -216,10 +216,11 @@ << if not exist "$(INSTDIR)\conf\httpd.conf" \ copy "$(INSTDIR)\conf\httpd.default.conf" "$(INSTDIR)\conf\httpd.conf" - awk -f <"$(INSTDIR)\bin\dbmmanage.pl" - { if ( $$0 !~ /^#.*-lsdbm/) { - gsub( /AnyDBM_File::ISA = qw\(.*\)/, "AnyDBM_File::ISA = qw(SDBM_File)" ); + awk -f <"$(INSTDIR)\bin\dbmmanage.pl" + { if ( $$0 ~ /^BEGIN { @AnyDBM_File::/ ) { + sub( /ISA = qw\(.*\)/, "ISA = qw(SDBM_File)" ); } - print $$0; + if ( $$0 !~ /^#!@perlbin@/ ) + print $$0; } <<