summaryrefslogtreecommitdiff
path: root/tools/genlang
diff options
context:
space:
mode:
Diffstat (limited to 'tools/genlang')
-rwxr-xr-xtools/genlang9
1 files changed, 8 insertions, 1 deletions
diff --git a/tools/genlang b/tools/genlang
index 3d77540..448784e 100755
--- a/tools/genlang
+++ b/tools/genlang
@@ -48,6 +48,7 @@ MOO
open(LANG, "<$input");
while(<LANG>) {
+ $line++;
if($_ =~ / *\#/) {
# comment
next;
@@ -56,10 +57,16 @@ while(<LANG>) {
$_ =~ s/\r//g;
if($_ =~ / *([a-z]+): *(.*)/) {
($var, $value) = ($1, $2);
- # print "$var => $value\n";
+ # print "$var => $value\n";
$set{$var} = $value;
+ if( (($var eq "new") && $value && ($value !~ /^\"(.*)\"$/)) ||
+ (($var eq "eng") && ($value !~ /^\"(.*)\"$/)) ) {
+ print "missing quotes on line $line for ".$set{'id'}."\n";
+ next;
+ }
+
if($var eq "new") {
# the last one for a single phrase