diff options
Diffstat (limited to 'tools/genlang')
-rwxr-xr-x | tools/genlang | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/tools/genlang b/tools/genlang index 893badb57e..abff3e8e18 100755 --- a/tools/genlang +++ b/tools/genlang @@ -16,6 +16,7 @@ my $LANGUAGE_COOKIE = 0x1a; my $VOICE_COOKIE = 0x9a; my $LANGUAGE_VERSION = 0x06; my $LANGUAGE_FLAG_RTL = 0x01; +my $LANGUAGE_FLAG_UNITS_FIRST = 0x02; my $HEADER_SIZE = 4; my $SUBHEADER_SIZE = 6; @@ -369,6 +370,13 @@ while(<LANG>) { if($_ =~ /^( *\#|[ \t\n\r]*\z)/) { # comment or empty line - output it if it's part of the header + if ($_ =~ /LANGUAGE_IS_RTL/) { + $langoptions |= $LANGUAGE_FLAG_RTL; + } + if ($_ =~ /LANGUAGE_UNITS_FIRST/) { + $langoptions |= $LANGUAGE_FLAG_UNITS_FIRST; + } + if ($header and $sortfile) { print($_); } @@ -485,12 +493,6 @@ while(<LANG>) { } undef @phrase; } # end of </phrase> - elsif($part eq "/options") { - # closing the options - if ($options{'rtl'}) { - $langoptions |= $LANGUAGE_FLAG_RTL; - } - } # end of </options> # starts with a slash, this _ends_ this section $m = pop @m; # get back old value, the previous level's tag |