From: Peter Prymmer <PPrymmer@factset.com>
Date: Tue, 25 Jul 2000 18:59:16 +0000 (-0700)
Subject: bug fix for munchconfig (turned up by CXX)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=154545c719744e0c72089d7eedb40eeb83bbbcc7;p=p5sagit%2Fp5-mst-13.2.git

bug fix for munchconfig (turned up by CXX)
Message-ID: <Pine.OSF.4.10.10007251805350.294719-100000@aspara.forte.com>

p4raw-id: //depot/perl@6440
---

diff --git a/vms/munchconfig.c b/vms/munchconfig.c
index 158de3c..82768db 100644
--- a/vms/munchconfig.c
+++ b/vms/munchconfig.c
@@ -345,8 +345,7 @@ tilde_sub(char LineBuffer[], Translate TildeSub[], int TildeSubCount)
         
       } else {
         /* 'Kay, not a tilde. Is it a word character? */
-        if (isalnum(LineBuffer[TildeLoop]) || (LineBuffer[TildeLoop] =
-                                              '-') ||
+        if (isalnum(LineBuffer[TildeLoop]) ||
             (LineBuffer[TildeLoop] == '-')) {
           TempTilde[TildeBufferLength++] = LineBuffer[TildeLoop];
         } else {