ignore commented-out lines in wml files
This commit is contained in:
parent
76eec64ed9
commit
ee9da91616
1 changed files with 1 additions and 0 deletions
|
@ -7,6 +7,7 @@ sub readwml {
|
|||
my (%trans, $key);
|
||||
|
||||
while (<TRANS>) {
|
||||
next if m/^\s*\#/ and !defined $key;
|
||||
if (m/(\S+)\s*=\s*(?:_\s*)?\"(.*)\"\s*$/) {
|
||||
# single-line
|
||||
die "nested key" if defined $key;
|
||||
|
|
Loading…
Add table
Reference in a new issue