From 90fa6ee042215bf4304e1b0063bc35bf8ed4594c Mon Sep 17 00:00:00 2001
From: Shlomi Fish <shlomif@shlomifish.org>
Date: Sat, 3 Aug 2019 08:53:05 +0300
Subject: 44637: = doesn't need quoting in awk regexp. Known to cause warnings
 in gawk 5.

---
 Src/makepro.awk | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Src')

diff --git a/Src/makepro.awk b/Src/makepro.awk
index 0498c1545..226d3f96b 100644
--- a/Src/makepro.awk
+++ b/Src/makepro.awk
@@ -121,7 +121,7 @@ BEGIN {
 		# initialiser.
 		dcltor = substr(line, 1, RLENGTH-1)
 		line = substr(line, RLENGTH+1)
-		sub(/\=.*$/, "", dcltor)
+		sub(/=.*$/, "", dcltor)
 		match(dcltor, /^([^_0-9A-Za-z]| const )*/)
 		dcltor = substr(dcltor, 1, RLENGTH) "@+" substr(dcltor, RLENGTH+1)
 		match(dcltor, /^.*@\+[_0-9A-Za-z]+/)
-- 
cgit 1.4.1