From f775a0550981db9d84efaec164d1e141dd58b354 Mon Sep 17 00:00:00 2001 From: "G. Richardson" Date: Fri, 31 Jul 2015 10:00:31 +0200 Subject: [PATCH] =?utf8?q?Locale=20-=20richtigen=20Filehandle=20f=C3=BCr?= =?utf8?q?=20Men=C3=BC=C3=BCbersetzungen=20benutzen?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/Locale.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/SL/Locale.pm b/SL/Locale.pm index 4198a339b..25e804333 100644 --- a/SL/Locale.pm +++ b/SL/Locale.pm @@ -95,7 +95,7 @@ sub _init { for my $file (@files) { if (open my $in, "<", "locale/$country/more/$file") { local $/ = undef; - my $code = <$file>; + my $code = <$in>; eval($code); close($in); $self->{texts}{$_} = $self->{more_texts}{$_} for keys %{ $self->{more_texts} }; -- 2.20.1