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

Utils: Fix STRINGN codes in conv-lang.pl

Browse Source
This commit is contained in:
Jonathan G Rennison
2023-07-26 21:26:12 +01:00
parent e0c59aaa77
commit ee6481aadc
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
utils/conv-lang.pl
View File

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