dave/openttd
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Jonathan G Rennison
2023-07-30 23:09:24 +01:00
parent 924b2ab9ec
commit c79dd3656f
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
utils/conv-lang.pl
View File

@@ -120,8 +120,8 @@ for my $lang (@langs) {
if (/^(\w+)\s*:/) { if (/^(\w+)\s*:/) {
my $str = $strs{$1}; my $str = $strs{$1};
if ($str) { if ($str) {
$str =~ s/\{STRING\d\}/{STRING}/g; $str =~ s/\{((?:\d:)?)STRING\d\}/{${1}STRING}/g;
$str =~ s/\{RAW_STRING\}/{STRING}/g; $str =~ s/\{((?:\d:)?)RAW_STRING\}/{${1}STRING}/g;
push @lines, $str . "\n"; push @lines, $str . "\n";
$suppress_whitespace = 0; $suppress_whitespace = 0;
} }