diff options
| author | Bas Zoetekouw <bas> | 2008-12-14 14:58:21 +0000 |
|---|---|---|
| committer | Bas Zoetekouw <bas> | 2008-12-14 14:58:21 +0000 |
| commit | 34bb53191d84cc24203650fbd937db8744c1708b (patch) | |
| tree | 2341facfee4f2c0536911b85c370e2e69c167562 /check_trans.pl | |
| parent | 0d9f643865947afa0b0a9ead499e1e490f3f3391 (diff) | |
Properly ignore commented lines in $lang/.wmlrc files
(see http://lists.debian.org/debian-www/2008/12/msg00122.html)
CVS version numbers
check_trans.pl: 1.86 -> 1.87
Diffstat (limited to 'check_trans.pl')
| -rwxr-xr-x | check_trans.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/check_trans.pl b/check_trans.pl index c434ad17c6e..d468cabbf35 100755 --- a/check_trans.pl +++ b/check_trans.pl @@ -1188,6 +1188,7 @@ sub get_file_charset { while ( my $line = <$fd> ) { + next if $line =~ m{^[#%]}; next unless $line =~ m{CHARSET=(.*?)\s*$}; $charset = $1; last; |