Mercurial > pub > Impl
diff Lib/IMPL/Resources/Strings.pm @ 337:f4e14f32cf54
fixed bugs with string and local $_
added support for localized labels
author | cin |
---|---|
date | Fri, 14 Jun 2013 15:37:34 +0400 |
parents | 1838bdb4d238 |
children | 2eed076cb944 |
line wrap: on
line diff
--- a/Lib/IMPL/Resources/Strings.pm Fri Jun 14 03:32:55 2013 +0400 +++ b/Lib/IMPL/Resources/Strings.pm Fri Jun 14 15:37:34 2013 +0400 @@ -87,8 +87,8 @@ sub ParseStringsMap { my ($fname) = @_; - open my $hRes, "<:encoding($Encoding)", findFile($fname) or die "Failed to open file $fname: $!"; - + open my $hRes, "<:encoding($Encoding)", $fname or die "Failed to open file $fname: $!"; + local $_; my %Map; my $line = 1; while (<$hRes>) {