From c79dd3656f68d5b653f2f16d35a8819c0fa12bff Mon Sep 17 00:00:00 2001 From: Jonathan G Rennison Date: Sun, 30 Jul 2023 23:09:24 +0100 Subject: [PATCH] conv-lang.pl: Support N: prefixes when fixing STRINGN codes --- utils/conv-lang.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/utils/conv-lang.pl b/utils/conv-lang.pl index 60fb3e3bef..578c1c24c8 100755 --- a/utils/conv-lang.pl +++ b/utils/conv-lang.pl @@ -120,8 +120,8 @@ for my $lang (@langs) { if (/^(\w+)\s*:/) { my $str = $strs{$1}; if ($str) { - $str =~ s/\{STRING\d\}/{STRING}/g; - $str =~ s/\{RAW_STRING\}/{STRING}/g; + $str =~ s/\{((?:\d:)?)STRING\d\}/{${1}STRING}/g; + $str =~ s/\{((?:\d:)?)RAW_STRING\}/{${1}STRING}/g; push @lines, $str . "\n"; $suppress_whitespace = 0; }