summaryrefslogtreecommitdiff
path: root/tools
diff options
context:
space:
mode:
Diffstat (limited to 'tools')
-rwxr-xr-xtools/genlang19
1 files changed, 11 insertions, 8 deletions
diff --git a/tools/genlang b/tools/genlang
index 86cb367dd2..be7d791afe 100755
--- a/tools/genlang
+++ b/tools/genlang
@@ -336,7 +336,10 @@ while(<LANG>) {
336 # "none" as dest (without quotes) means that this entire 336 # "none" as dest (without quotes) means that this entire
337 # phrase is to be ignored 337 # phrase is to be ignored
338 } 338 }
339 else { 339 elsif(!$update) {
340 # we don't do the fully detailed analysis when we "update"
341 # since we don't do it for a particular target etc
342
340 # allow the keyword 'deprecated' to be used on dest and 343 # allow the keyword 'deprecated' to be used on dest and
341 # voice strings to mark that as deprecated. It will then 344 # voice strings to mark that as deprecated. It will then
342 # be replaced with "". 345 # be replaced with "".
@@ -344,25 +347,25 @@ while(<LANG>) {
344 $dest =~ s/^deprecate(|d)\z/\"\"/i; 347 $dest =~ s/^deprecate(|d)\z/\"\"/i;
345 $voice =~ s/^deprecate(|d)\z/\"\"/i; 348 $voice =~ s/^deprecate(|d)\z/\"\"/i;
346 349
347 # Use the ID name to figure out which id number range we
348 # should use for this phrase. Voice-only strings are
349 # separated.
350
351 # basic syntax error alerts, if there are no quotes we 350 # basic syntax error alerts, if there are no quotes we
352 # will assume an empty string was intended 351 # will assume an empty string was intended
353 if($dest !~ /^\"/) { 352 if($dest !~ /^\"/) {
354 print STDERR "Warning: dest before line $line lacks quotes!\n"; 353 print STDERR "Warning: dest before $input line $line lacks quotes ($dest)!\n";
355 $dest='""'; 354 $dest='""';
356 } 355 }
357 if($src !~ /^\"/) { 356 if($src !~ /^\"/) {
358 print STDERR "Warning: source before line $line lacks quotes!\n"; 357 print STDERR "Warning: source before $input line $line lacks quotes ($src)!\n";
359 $src='""'; 358 $src='""';
360 } 359 }
361 if($voice !~ /^\"/) { 360 if($voice !~ /^\"/) {
362 print STDERR "Warning: voice before line $line lacks quotes!\n"; 361 print STDERR "Warning: voice before $input line $line lacks quotes ($voice)!\n";
363 $voice='""'; 362 $voice='""';
364 } 363 }
365 364
365 # Use the ID name to figure out which id number range we
366 # should use for this phrase. Voice-only strings are
367 # separated.
368
366 if($idstr =~ /^VOICE/) { 369 if($idstr =~ /^VOICE/) {
367 $idnum = $voiceid++; 370 $idnum = $voiceid++;
368 } 371 }