From: William A. Rowe Jr <wrowe@apache.org>
Date: Sat, 24 Nov 2001 16:38:01 +0000 (+0000)
Subject:   Reports arrive that some awks are tripped up by an unquoted, unpaired
X-Git-Tag: 2.0.29~20
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=a3a4d03f3f798e6281a0676c2d869e8726ed186a;p=apache

  Reports arrive that some awks are tripped up by an unquoted, unpaired
  open curly brace.  This solves, seems to have to adverse affects on
  other awks.


git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@92165 13f79535-47bb-0310-9956-ffa450edef68
---

diff --git a/Makefile.win b/Makefile.win
index bbc0a0f853..1de4b6caac 100644
--- a/Makefile.win
+++ b/Makefile.win
@@ -461,7 +461,7 @@ _install:
 	if not exist "$(INSTDIR)\conf\ssl.conf" \
             copy "$(INSTDIR)\conf\ssl.default.conf" "$(INSTDIR)\conf\ssl.conf"
 	awk -f <<script.awk "support\dbmmanage.in" >"$(INSTDIR)\bin\dbmmanage.pl"
-    { if ( $$0 ~ /^BEGIN { @AnyDBM_File::/ ) {
+    { if ( $$0 ~ /^BEGIN \{ @AnyDBM_File::/ ) {
           sub( /ISA = qw\(.*\)/, "ISA = qw(SDBM_File)" ); 
       }
       if ( $$0 !~ /^#!@perlbin@/ )