summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/perl/vms/munchconfig.c
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/perl/vms/munchconfig.c')
-rw-r--r--gnu/usr.bin/perl/vms/munchconfig.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/gnu/usr.bin/perl/vms/munchconfig.c b/gnu/usr.bin/perl/vms/munchconfig.c
index 158de3caf5d..82768db12ce 100644
--- a/gnu/usr.bin/perl/vms/munchconfig.c
+++ b/gnu/usr.bin/perl/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 {