Remove \r or ^M when reading teranslation files. Thanks to Filipe Teixeira for the report.
This commit is contained in:
parent
a8d5a58277
commit
adbc23a034
|
@ -737,6 +737,7 @@ sub _init
|
|||
open(IN, "$self->{Lang}") or die "ERROR: can't open translation file $self->{Lang}, $!\n";
|
||||
while (my $l = <IN>) {
|
||||
chomp($l);
|
||||
$l =~ s/\r//gs;
|
||||
next if ($l =~ /^[\s\t]*#/);
|
||||
next if (!$l);
|
||||
my ($key, $str) = split(/\t+/, $l);
|
||||
|
|
Loading…
Reference in New Issue