From 01afbc332316005a1cf7393fcdde3042be4316eb Mon Sep 17 00:00:00 2001
From: Brian Cully <bjc@kublai.com>
Date: Mon, 13 Nov 2017 09:11:19 -0500
Subject: Config file is utf8.

---
 xmpt | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'xmpt')

diff --git a/xmpt b/xmpt
index 2fe643e..337e00e 100755
--- a/xmpt
+++ b/xmpt
@@ -61,6 +61,7 @@ sub read_conf {
 
   my $fh = new IO::File("<$filen") ||
     die "Couldn't open $filen for reading: $!\n";
+  binmode($fh, ':utf8');
   map {
     chomp;
     s/\#.*$//;
@@ -147,6 +148,7 @@ sub thunk {
   ['thunk',
    sub {
      package evalpkg;
+     use utf8;
      local $evalpkg::arg = shift;
      my $rc = eval $b;
      $@ &&
-- 
cgit v1.2.3