This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
integrate change#1870 from mainline
authorHans Mulder <hansmu@xs4all.nl>
Fri, 14 Aug 1998 09:20:16 +0000 (02:20 -0700)
committerGraham Barr <gbarr@pobox.com>
Thu, 29 Oct 1998 14:28:13 +0000 (14:28 +0000)
Message-Id: <3.0.5.32.19980814092016.00b37dc0@ous.edu>
Subject: [PATCH 5.005_02] (and _5x I expect) VMS config procedure patch

p4raw-link: @1870 on //depot/perl: 6ce52b3371c668f64a2647a024b0472d1c3bdc45

p4raw-id: //depot/maint-5.005/perl@2128
p4raw-integrated: from //depot/perl@2127 'copy in' configure.com
(@1760..)

configure.com

index 5212219..d51793a 100644 (file)
@@ -974,7 +974,7 @@ $     line = F$EDIT(line,"COMPRESS, TRIM")
 $     patchlevel = F$EXTRACT(18,F$LENGTH(line)-18,line)
 $     got_patch = "true"
 $   ENDIF
-$   IF ((F$LOCATE("SUBVERSION",line).NE.F$LENGTH(line)).AND.(.NOT.got_sub))
+$   IF ((F$LOCATE("#define SUBVERSION",line).NE.F$LENGTH(line)).AND.(.NOT.got_sub))
 $   THEN
 $     line = F$EDIT(line,"COMPRESS, TRIM")
 $     subversion = F$EXTRACT(18,F$LENGTH(line)-18,line)