conv-lang.pl: Support N: prefixes when fixing STRINGN codes

9 months ago · c79dd3656f
parent 924b2ab9ec
commit c79dd3656f
1 changed files with 2 additions and 2 deletions
--- 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;
 			}