Don't add empty strings to translations
parent
eadcf76a9c
commit
3e0674b9cb
|
@ -23,10 +23,10 @@ my %keywords = (
|
||||||
while (<>) {
|
while (<>) {
|
||||||
# Matches lines:
|
# Matches lines:
|
||||||
# KEYWORD "String" ...
|
# KEYWORD "String" ...
|
||||||
if ( $_ =~ /^\s*(\w+)\s+"(.+?)"/ ) {
|
if ( $_ =~ /^\s*(\w+)\s+"(.+?)"/ && $_ !~ /^\s*(\w+)\s+""/) {
|
||||||
# Excludes blank strings and strings of the form word followed by digit
|
# Excludes blank strings and strings of the form word followed by digit
|
||||||
# which are control names (e.g. DateTimePicker3)
|
# which are control names (e.g. DateTimePicker3)
|
||||||
if (exists($keywords{$1}) && $2 !~ /^ *$/ && $2 !~ /^\w+\d$/ ) {
|
if (exists($keywords{$1}) && $2 !~ /^ *$/ && $2 !~ /^\w+\d$/ && $2 !~ /^""/) {
|
||||||
print qq{_("$2");\n};
|
print qq{_("$2");\n};
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue