summaryrefslogtreecommitdiff
path: root/tools/genlang
diff options
context:
space:
mode:
Diffstat (limited to 'tools/genlang')
-rwxr-xr-xtools/genlang10
1 files changed, 4 insertions, 6 deletions
diff --git a/tools/genlang b/tools/genlang
index 893badb57e..4f7386890d 100755
--- a/tools/genlang
+++ b/tools/genlang
@@ -369,6 +369,10 @@ while(<LANG>) {
369 369
370 if($_ =~ /^( *\#|[ \t\n\r]*\z)/) { 370 if($_ =~ /^( *\#|[ \t\n\r]*\z)/) {
371 # comment or empty line - output it if it's part of the header 371 # comment or empty line - output it if it's part of the header
372 if ($_ =~ /LANGUAGE_IS_RTL/) {
373 $langoptions |= $LANGUAGE_FLAG_RTL;
374 }
375
372 if ($header and $sortfile) { 376 if ($header and $sortfile) {
373 print($_); 377 print($_);
374 } 378 }
@@ -485,12 +489,6 @@ while(<LANG>) {
485 } 489 }
486 undef @phrase; 490 undef @phrase;
487 } # end of </phrase> 491 } # end of </phrase>
488 elsif($part eq "/options") {
489 # closing the options
490 if ($options{'rtl'}) {
491 $langoptions |= $LANGUAGE_FLAG_RTL;
492 }
493 } # end of </options>
494 492
495 # starts with a slash, this _ends_ this section 493 # starts with a slash, this _ends_ this section
496 $m = pop @m; # get back old value, the previous level's tag 494 $m = pop @m; # get back old value, the previous level's tag