From a7e30af46533d16a9ccb47b6d19c38c62d2006e4 Mon Sep 17 00:00:00 2001 From: "Steinar H. Gunderson" Date: Fri, 20 Nov 2015 15:30:54 +0100 Subject: [PATCH 1/1] Fix UTF-8 issues in reading templates. --- perl/Sesse/pr0n/Templates.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/Sesse/pr0n/Templates.pm b/perl/Sesse/pr0n/Templates.pm index 61685c4..ecac13f 100644 --- a/perl/Sesse/pr0n/Templates.pm +++ b/perl/Sesse/pr0n/Templates.pm @@ -56,7 +56,7 @@ sub fetch_template { my $newcache = {}; my $base = $Sesse::pr0n::Config::template_base; - open TEMPLATE, "<$base/$dir/$template" + open TEMPLATE, "<:utf8", "$base/$dir/$template" or ($dir ne 'default' and open TEMPLATE, "<$base/default/$template") or Sesse::pr0n::Common::error($r, "Couldn't open $dir/$template: $!"); -- 2.39.2